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Myrtle ist verliebt. 

Immer wenn sie Gordon sieht, 
schlägt ihr Herz höher und sie ver¬ 
sucht ihn mit der zarten Stimme 
eines Nebelhorns zu betören - 
worauf Gordon ins Wasser flüchtet. 

Doch zu früh gefreut - Myrtle stürzt 
sich mit ihren 2 Zentnern in die 
Fluten und verwandelt sich in 
eine reizende-wenn auch etwas 
dickliche - Meerjungfrau. 


In der phantastischen Unterwasser¬ 
welt sucht Myrtle nun verzweifelt 
nach Gordon. Versteckt er sich viel¬ 
leicht hinter dem Wrack des riesigen 
Ozeandampfers, oder in der ver¬ 
sunkenen Stadt oder... Doch erst 
muß Myrtle ein Guiness trinken, 
um ihre verliebte Suche fortzusetzen. 
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Für und wieder 
Pascal 


Alles schön und gut, daß 
Sie sich jetzt so ausführlich 
mit Pascal beschäftigen - 
aber gibt es denn sonst gar 
nichts mehr? Ich würde mir 
wünschen, daß in Zukunft 
weiter mehr für Assembler- 
Programmierer geboten 
wird - schließlich ist Ma¬ 
schinensprache nicht nur 
schneller, sondern für spe¬ 
zielle Probleme auf der Be¬ 
triebssystemebene immer 
noch die optimale Lösung. 
HELMUTREK 
4156 WILLICH 

Warum entschuldigen sich 
Autoren, die Einführungen 
in Pascal bringen, eigent¬ 
lich immer dafür, daß Pas¬ 
cal ,,umständlich“ ist? Es 
ist doch im Gegenteil so, 
daß durch Vorgabe von 
globalen und lokalen Varia¬ 
blen bestimmter Typen von 
Anfang an Ordnung ins 
Programm kommt. 

PROF. DR. DR. H. C. G. 

SNATZKE 

4630 BOCHUM 

Nichts gegen Pascal - 
aber ich finde es unfair, 
daß jetzt gegen BASIC ge¬ 
schossen wird und alle BA- 
SlC-Programmierer als 
Chaoten abgestempelt wer¬ 
den. Auch in BASIC läßt 
sich sauber programmie¬ 
ren, und wenn man das 
Endresultat dann durch ei¬ 
nen Compiler jagt, sind die 
Programme nicht langsa¬ 
mer als die der Pascal-Kon¬ 
kurrenz. 

RAINER WALDHOFF 
8000 MÜNCHEN 

Daß Pascal die Zukunfts¬ 
sprache ist, sehe ich noch 
nicht. Ein Programmiersy¬ 
stem der Zukunft kann mei¬ 
ner Meinung nach nur im 
Dialogsystem funktionieren, 
aber dafür reicht wohl der 
Speicherplatz der heutigen 
Home-Computer noch nicht 
aus. 

KARL BAUMANN 
6443 SONTRA 


HC 7/86, Seite 116 
Der letzte Hammer 
Als wir das Programm mit 
dem ,,Amiga-BaH“ das erste 
Mal laufenließen, blieb 
auch uns die Spucke weg. 
Wir waren spätestens von da 
an überzeugt, daß unser 
Computer kein popeliger 
Atari 800 XL ist. Wir sind em¬ 
pört darüber, daß ein Com¬ 
puter, der zu solchen Lei¬ 
stungen fähig ist, so herab¬ 
gewürdigt wird. 
ATAR/-USER-CLUB 
2190 CUXHAVEN 1 

In Ihrer Juli-Ausgabe haben 
Sie einen weiteren Beweis 
dafür geliefert, daß Sie von 
Commodore bestochen 
sind. Oder hätten Sie sonst 
den Preis/Leistungs-Mörder 
(hoher Preis/geringe Lei¬ 
stung) Commodore Amiga 
als Wundermaschine be¬ 
zeichnet? Wenn Sie wirklich 
ein Programm vorweisen 


Unfähig! 


Mir kommt es so vor, als 
könnten Sie einen Perso¬ 
nal-Computer nicht von ei¬ 
nem Home-Computer un¬ 
terscheiden. Wie kann es 
sonst passieren, daß der 
Atari 260 ST in Ihrer Hitpa¬ 
rade in der Kategorie 
,,Home-Computer“ landet. 
Daß ein Home-Computer 
einen 16-bit-Prozessor, ei¬ 
nen Speicher von 512 KByte 
und eine GEM-Benutzer- 
oberfläche besitzt, ist mir 
unbekannt. Mal sehen, wie 
lange es dauert, bis der 
Commodore 64 mit GEOS 
ein Personal-Computer ge¬ 
worden ist. 

OLIVER BACZKOWSKI 
1000 BERLIN 41 


können, welches den 
Amiga-Ball nachmacht, so 
sei Ihnen vergeben. Im an¬ 
deren Fall erwarte ich von 
Ihnen, daß Sie sich in aller 
Form bei allen Atarianern 
entschuldigen und in Zu¬ 
kunft solche perversen Ver¬ 
öffentlichungen unterlas¬ 
sen. Denn wenn man den 
Atari 800 XL neben den 
wirklich popeligen Commo¬ 
dore 64 hinstellt, so muß 
man doch zugeben, daß 
der Atari 800 XL ein weitaus 
schöneres Design vorwei¬ 
sen kann, als der Commo¬ 
dore 64. 

RENE SCHUSTER 
A-8020 GRAZ 

Anmerkung der Redaktion: 
Das Programm, welches 
den Amiga-Ball aus der 
Werbung auf dem Atari 800 
XL zum Laufen bringt, 
stammt aus den USA und 
Hegt uns vor. 


Zu viel für 
Commodore 64 


Eigentlich sind fast alle 
Zeitschriften mit Program¬ 
men für C64 sehr reich ge¬ 
segnet, so daß zum Bei¬ 
spiel ein ,.Sprite-Editor“ 
wohl schon in allen Zeit¬ 
schriften zu finden war und 
von da her nur Platz in Ihrer 
Zeitschrift verschwendet. 
Anstelle der sich immer 
wiederholenden Pro¬ 
gramme könnte man doch 
etwas für andere Computer 
bringen. 

ANDREAS BORCHERT 
2120 LÜNEBURG 


Es lebe der 
C64 ... 


HC 7/86, Seite 3 
Es lebe der Atari. . . 

Kann es sein, daß sich Herr 
Schuster, Autor eines Le¬ 
serbriefs in Ihrer Juli-Aus¬ 
gabe, erst seit zwei Wo¬ 
chen für Computer interes¬ 
siert? Wenn er den Com¬ 
modore 64 als Spielma¬ 
schine bezeichnet und sich 
dabei auf die große Anzahl 
von Spielen bezieht, so 
darf ich ihn an die große 
Anzahl an professionellen 
Anwendungen und Erweite¬ 
rungen für den C64 erin¬ 
nern. Außerdem eignet sich 
die Hardware des C64 nun 
mal so gut für Spielpro¬ 
gramme. 

Der Commodore 64 wird 
wegen seinem schwachen 
BASIC neben dem Apple 
als Lern- und Ausbildungs- 
Computer eingesetzt. Das 
V.2-BASIC regt durch die 
wenigen Befehle zur eige¬ 
nen Kreativität an und ist 
schnell und leicht zu erler¬ 
nen und die hardwareorien¬ 
tierte Programmierung 
durch PEEK und POKE ist 
der erste Schritt zur Ma¬ 
schinensprache. Der hei¬ 
ßen und lahmen 1541 - 
Floppy kann man durch 
Speeder, Kühlventilatoren 
und einem stabilisierten 
Netzteil sehr schnell Abhilfe 
schaffen. 

STEFAN OTTERS BACH 
5207 RUPPICHTEROTH 


Wie ist Ihre 
Meinung? 

Wenn Ihnen zu einem Ar¬ 
tikel in HC oder zur Mei¬ 
nung anderer Leser etwas 
einfällt, können Sie uns 
gerne schreiben. Wir 
freuen uns über Ihre Zu¬ 
schriften. Je kürzer ein Le¬ 
serbrief ist, um so größer 
ist seine Chance, veröf¬ 
fentlicht zu werden. 

Die HC-Redaktion 
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Digital Equipment 
sucht Mitarbeiter für 
Frankfurt _ 

D as Computerunterneh¬ 
men mit Hauptsitz in 
München will im Frankfurter 
Raum expandieren. In die¬ 
sem Jahr sollen noch wei¬ 
tere 100 Mitarbeiter in 
Sprendlingen bei Frankfurt 
eingestellt werden. Bereits 
im vergangenen Jahr wurde 
die Belegschaft um 50 Pro¬ 
zent auf 500 Mitarbeiter ver¬ 
größert. 


Interface für C64/ 

128 jetzt Speeddos- 
und Geos-kompatibel 

A b sofort werden alle 
C64/128-Druckerinterfa¬ 
ces vom Typ 9200/G von 
Wiesemann in einer Version 
ausgeliefert, die vollständig 
kompatibel ist mit High- 
Speed Betriebssystemen 
wie Speeddos und Geos. 
Ältere Interfaces dieses Typs 
können gegen 50 Mark um¬ 
gerüstet werden. 






Current-Loop/V24-lnterface 


D as neue Interface Typ 
84 000 von Wiesemann 
wandelt eine 20-mA- 
Schnittstelle in eine V24 um. 
Das Gerät überträgt bidirek¬ 
tional; Stromschleife und 
V24-Seite sind durch Opto¬ 
koppler voneinander ge¬ 
trennt. Die Stromschnitt¬ 
stelle arbeitet passiv. Unter¬ 
schiedliche Zuordnungen 
von Strom-/Nicht-Strom zu 


0/1-Pegeln können im Inter¬ 
face angeglichen werden - 
jeder Kanal kann separat in¬ 
vertierend oder nicht-inver- 
tierend betrieben werden. 
Das Interface kann mit ei¬ 
nem mitgelieferten Stecker¬ 
netzteil oder über das ange¬ 
schlossene V24-Gerät (5 
Volt) versorgt werden. Das 
Interface ist für unter 250 
Mark lieferbar. 


Sorgt für Sicherheit 
ime^rchiuiK^^^^^ 

A ufstell-Ringbuchordner 
mit Ablegehüllen für 
Disketten bietet jetzt Döbbe- 
lin & Boeder. So sei eine 
platzsparende Archivierung 
von 40 Disketten im 8"-, 
5,25"- oder 3 > 5"-Format 
möglich. Das Ringbuch ist 
aus blauem, festem Kunst¬ 
stoff und ist nicht nur stets 
griffbereit, sondern kann 
auch am Arbeitsplatz aufge¬ 
stellt werden. 
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Universeller 
Monitor für 
Home-Computer 


S peziell auf die Bedürf¬ 
nisse der Besitzer von 
Home-Computern zuge¬ 
schnitten ist der Farbmoni¬ 
tor von Orion. Wegen des 
recht günstigen Preises von 
knapp 1000 Mark haben wir 
uns das Gerät genauer an¬ 
gesehen. Der Ergebnis: 
Flimmerfreie Farbgrafiken 
vom C64 präsentieren sich 
in kaum jemals erreichter 
Qualität. 

Mit seinen vielfältigen 
Eingängen (RGG analog/di¬ 
gital, Composite, Luminanz/ 
Crominanz) kann der C128 
beispielsweise im RGB-Mo- 
dus betrieben werden. Die 
Folge ist eine nochmals ge¬ 
steigerte Brillanz, da bei 
dieser Betriebsart das Bild¬ 


signal dem Monitor in der 
Form zur Verfügung gestellt 
wird, mit der die Bildröhre 
direkt angesteuert werden 
kann. Jegliche (qualitäts¬ 
mindernden) Umformungen 
entfallen hierbei. 

In punkto Auflösung ließ 
der CCM-1280 keinen 
Wunsch offen: Auch kriti¬ 
sche Farbkombinationen 
(etwa rote Schrift auf blauem 
Grund) wurden mühelos 
dargestellt. Angenehm fiel 
der Umschalter auf, der ein 
monochromes S/W-Bild in 
schwarzgrüne Darstellung 
verwandelt. Besonders bei 
einfarbigen Textprogram¬ 
men erwies sich diese Ein¬ 
stellung als ideal. 

Eine weitere Anwen¬ 
dungsmöglichkeit ist die 
Verwendung als Sichtgerät 
für den heimischen Video- 
Recorder. Bei dieser Be¬ 
triebsart erweist sich der 
Eingangswahlschalter als 
nützlich: Ein Umschalten 
von Computer- auf Video¬ 
bild ist ohne Umstecken von 
Kabeln möglich. Daß dieser 
Schalter allerdings auf die 
Gehäuserückseite verbannt 
wurde, erscheint uns unver¬ 
ständlich. Als störend wurde 
auch empfunden, daß der 
vertikale Bildfang nach dem 
Umschalten (zum Glück auf 
der Frontseite) nachgere¬ 
gelt werden mußte. 

Thorsten Freiberg 



MINE 


Computertage 
an der Saar 

Messe: Die 3. Elektronik- 
und Computertage Saar 
finden als Verkaufs- und 
Informationsmesse statt. 
Im Foyer West der Kon¬ 
greßhalle ist das Home- 
Computer-Paradies zu fin¬ 
den mit allem Zubehör, 
was der Anwender 
braucht. Fachvorträge, un¬ 
ter anderem von der Fach¬ 
hochschule und der Uni¬ 
versität des Saarlandes, 
helfen bei Problemlösun¬ 
gen. 

Saarbrücken, Kongreß¬ 
halle, 5. - 7. 9. 86. 

Foto- und 
Computerbörse 

Flohmarkt: Die Fotogruppe 
’81 veranstaltet ihre 1. Aa- 
lener Foto- und Computer¬ 
börse. Gebrauchte Foto¬ 
geräte und Computer mit 
Zubehör und Peripherie 
dürfen angeboten und na¬ 
türlich auch gekauft wer¬ 
den. 

Aalen (Ostalbkreis), im 
evangelischen Gemeinde¬ 
haus, 11-16 Uhr, 7. 9. 86. 
Info: 0 73 61/7 77 74. 

Texten mit Joyce 

Kurs: Locoscript, Textver¬ 
arbeitung auf dem Joyce. 

Berlin-Neukölln, jeden 
Dienstag und Donnerstag 
von 19-22 Uhr. Die Dauer 
des Kurses bestimmt der 
Lernende. 


Veranst.: ,,lhre Compute- 
rei“, Berlin 44. Info: 030/ 
6842667. 

Software für 
Anwender 

Kurse: Dbase III - Einfüh¬ 
rung. 

24. -26. 9. 86. 

F & A (Frage und Antwort). 

25. -26. 9. 86. 

Lotus 1-2-3, Vers. 2.0. 
29.-30. 9. 86 
Lotus Symphony. 

22.-24. 9. 86. 

Open Access II. 

10.-12. 9. 86. 

Alle Kurse in Hamburg. 
Veranst.: Computer Col¬ 
lege. Info: 0 40/2 70 78. 
Seminare: PC Oracle und 
10-Net (kostenfrei). 
Hannover, 12. 9. 86. 

Berlin, 15. 9. 86. 

Veranst.: Kettler EDV-Con- 
sulting. Info: 0 80 42/80 81. 

Unix, 68000er 
und C 

Kurse: Grundkurs Unix- 
Betriebssystem. 

2. - 4. 9. 86. 

Programmierung unter 
Unix 

9. -11. 9. 86. 

Motorola 16-Bit MC 6800. 

10. -11. 9. 86. 

Einführung in die Pro¬ 
grammiersprache C. 

15. - 19. 9. 86. 

BASIC auf dem IBM PC. 

17. - 19. 9. 86. 

Alle Kurse in Essen. 
Veranst.: Haus der Technik 
e.V. Info: 02 01/18 03-1. 


DB25-Steckergehäuse auch für dünne Kabel 


D B25-Stecker werden 

meist mit dünnen Ka¬ 
beln mit drei bis zehn Adern 
eingesetzt. Übliche Stecker¬ 
gehäuse sind jedoch so 
konstruiert, daß die Zugent¬ 
lastung für Kabel mit minde¬ 
stens zehn Adern gedacht 
ist. Das Steckergehäuse 
GDB25 von Wiesemann, 
Wuppertal, hat dagegen 


eine Zugentlastung, die be¬ 
reits Kabeldurchmesser ab 
zwei Millimeter fest packen 
kann. Großabnehmer (ab 
1000 Stück) können gegen 
Aufpreis ihre spezielle Farbe 
geliefert bekommen. Stück¬ 
preis etwa 2 Mark. 


GSX-Literatur 


D ie Schneiderdata GmbH 
in Freising hat den Ver¬ 
trieb der Original-Handbü¬ 
cher zu GSX-80 der Digital 
Research Inc. übernom¬ 
men. Die englische Literatur 
umfaßt einen GSX-80 User’s 
Guide und einen GSX Pro¬ 
grammen Guide. Das Ge¬ 
samtpaket kostet um 150 
Mark und ist bei Schneider- 
Vertragshändlern erhältlich. 


Wo ist denn der 
Pharao geblieben? 


V on Talent Computer Sy¬ 
stems kommt das Spiel 
,,The Lost Pharaoh“ für den 
Sinclair QL. Tief unter dem 
heißen Wüstensand führt ein 
Labyrinth zu der Kammer 
des Pharaos. Schurkische 
Diebe und weniger schurki¬ 
sche Archäologen sind auf 
der Suche bereits verloren 
gegangen. 
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Schneider: mit der 
Joyce auf dem Weg 
in die Zukunft 



Fred Köster, Computer Divi¬ 
sion von Schneider 


Im Juni hatten wir alle Betei¬ 
ligten über den Verkauf der 
Vertriebs- und Produktions¬ 
rechte aller Sinclair-Compu- 
ter an Amstrad befragt. 
Schneider gab damals be¬ 
kannt, man plane, die Sin- 
clair-Hardware im deutsch¬ 
sprachigen Raum zu vertrei¬ 
ben. Nähere Angaben fehlten 
damals allerdings. Wir frag¬ 
ten Fred Köster, Prokurist der 
Schneider AG und Leiter der 
Computer Division, nach dem 
neuesten Stand und spra¬ 
chen auch mit ihm über die 
zukünftige Weiterentwick¬ 
lung von Schneider. 

Wann wird es die ersten Sin- 
c/air-Computer unter dem 

Schneider-Labe! geben? 

Nach eingehenden Überle¬ 
gungen haben wir uns ent¬ 
schlossen, die Sinclair-Pro- 
dukte nicht zu vertreiben. 

Worin liegt der Grund für 

diesen Umschwung 7 ? 

Uns erscheint eine Integra¬ 
tion dieser Computer in un¬ 
sere bestehende Produkt¬ 
palette von der Abgrenzung 
her nicht sinnvoll. Zum an¬ 
deren haben wir uns ent¬ 
schieden, uns in Zukunft auf 
eine andere Richtung zu 
konzentrieren. 


Welche denn ? 

Nun, wir haben ja mit Joyce 
den Weg bereits angedeu¬ 
tet. 

Sie meinen den Bereich der 
Personal-Computer. Heißt 

das, daß der Schneider PC 

bereits auf der nächsten 

Computermesse, der Orga- 
technik, zu sehen ist? 

Dazu möchte ich zum jetzi¬ 
gen Zeitpunkt nichts sagen. 

Glauben Sie daß der 
Schneider PC gegenüber 

den preiswerten kompati¬ 
blen Taiwan-PC überhaupt 
noch eine Chance besitzt? 

Wir werden sicherlich nur 
Produkte einführen, denen 
wir hervorragende Markt¬ 
chancen einräumen. Um ei¬ 
nen Preis bewerten zu kön¬ 
nen, muß man die Leistung 
und Ausstattung eines 
Computers zu diesem Preis 
in Beziehung bringen. Und 
da werden wir mit Sicherheit 
auch zukünftig die Nase 
vorn haben. 

In letzter Zeit ist der Preis für 
den CPÖ6128 erheblich ge¬ 

fallen. War der Rechner zum 
alten Preis nicht mehr zu 
verkaufen? 

Wir haben die Verkaufs¬ 
preisempfehlungen ge¬ 
senkt, da wir aufgrund gün¬ 
stiger Währungsentwicklun¬ 
gen sowie Rationalisierun¬ 
gen in der Produktion in der 
Lage dazu waren. 

Wird es in der nächsten Zeit 
Neuheiten beziehungsweise 
Änderungen bei der CPC- 

Mode/Ireihe geben ? 

Aktuell stehen keine Neu¬ 
heiten bei dieser Produktfa¬ 
milie vor ihrer unmittelbaren 
Markteinführung. 

In unserem letzten Interview 
hat ihnen Winfried Hoff- 
mann der Geschäftsführer 

von Commodore Deutsch¬ 

land, Erfolglosigkeit vorge¬ 
worfen und Probleme pro- 
phezeit. 


In dieser Branche wird an¬ 
scheinend öfter einmal fahr¬ 
lässig mit Marktzahlen um¬ 
gesprungen — Schneider 
hat im Vergleich zum ersten 
Halbjahr 1985 in den Mona¬ 
ten Januar bis Juni 1986 ein 
Wachstum von 50<Vo er¬ 
reicht. 

Von einem Abrutschen im 
Marktanteil kann also schon 
deshalb gar keine Rede 
sein, da der Gesamtmarkt 
deutlich langsamer gewach¬ 
sen ist. Wir von Schneider 
wollen uns auch zukünftig 
darauf konzentrieren, un¬ 
sere Produkte weiter erfolg¬ 
reich zu vermarkten, an¬ 
stelle negative Gerüchte 
über unseren Mitbewerb zu 
streuen. 

Und außerdem werden wir 
für die Zukunft unserem soli¬ 
den Vertriebskonzept treu 
bleiben. Wir wollen unter 
keinen Umständen unsere 
Computer über Lebensmit¬ 
tel-Discounter oder Tank¬ 
stellen anbieten, da wir der 
Meinung sind, daß unsere 
Vertriebspartner ein höhe¬ 
res Maß an Fachkompetenz 
für das Beratungs- und Ver¬ 
kaufsgespräch mitbringen 
sollten, als das in Bezug auf 
Computer und Anwendun¬ 
gen in dieser Vertriebs¬ 
schiene in der Regel anzu¬ 
treffen ist. 


Die Zukunft der Sinclair- 
Computer hierzulande ist 
nach der Absage von Schnei¬ 
der weiterhin offen. Jürgen 
Schumpich, bis April 1986 
Generalimporteur für Sin- 
clair-Products in Deutsch¬ 
land, steht in Verhandlungen 
mit Amstrad. Aufgrund seiner 
13jährigen Erfahrungen mit 
Sinclair ist Jürgen Schum¬ 
pich natürlich stark daran in¬ 
teressiert, mit Amstrad ins 
Geschäft zu kommen. Wir 
werden in der nächsten Aus¬ 
gabe über das Ergebnis der 
Verhandlungen berichten. -wt 



Formschön mit inte¬ 
griertem Schwenk- 
Neigefuß 


F ür IBM PC und Kompati¬ 
ble wie geschaffen sei 
der neue Farbmonitor, den 
Cetec Trading auf den Markt 
bringt. Die 12 ,, -Bildröhre ist 
entspiegelt und in einem 
formschönen Kunststoffge¬ 
häuse untergebracht. Der 
Signaleingang ist RGB-In- 
tensity/TTL positiv. Dieser 
„Polo“ (FTC-12ATH) kann 
von Farbe auf Grün oder 
Bernstein umgeschaltet 
werden und kostet unter 
1400 Mark. 



Handlicher Ratgeber 
rund ums Zubehör 


N ach dem Motto „in der 
Kürze liegt die Würze“ 
liefern die einzelnen Karten 
des Misco-Manuals wich¬ 
tige Hinweise rund um das 
Zubehör. Über Bedienungs¬ 
anleitungen und Einsatzbe¬ 
reiche hinaus gibt diese 
Lose-Blatt-Sammlung Tips 
für die verschiedensten Ge¬ 
räte und Produkte. Kosten¬ 
los erhältlich bei Misco in 
6082 Mörfelden-Walldorf. 
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„Eigenes Geld ohne 
eigene Bankverbindung? 
Wülste vielleicht auf Papis 
Konto überweisen lassen ?“ 


An den Kontogebühren jedenfalls soll es 
nicht liegen, wenn sich Berufsanfänger kein 
eigenes Konto leisten: Für Azubis ist das KKB- 
Berufsstartkonto drei Jahre lang gebührenfrei. 
Das macht sich bezahlt. Und jeder, der 18 ist, 
kriegt normalerweise auch sofort seine Euro¬ 



schecks und die Scheckkarte. Das macht unab¬ 
hängig. Rund um 
die Uhr. 


Sehen wir uns? 



KKB Bank 



Hauptverwaltung: Kasernenstraße 10, 4000 Düsseldorf 1. Die Adresse einer der rund 280 Zweigstellen finden Sie in Ihrem Telefonbuch. Btx *203040 #. 
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SOFT-TOPS 


Fußballspiele haben deutliche Tendenz nach unten, FA Cup 
Football ist auf Platz 21 gefallen. Ein neues Thema begeistert die 
Spieledesigner: Kernreaktor-Unfälle. ,.Countdown to melt“, für 
C64, ist zwar noch nicht in der Chart, hat aber beste Chancen 
(aus: Your Computer, London). 


1. Bomb Jack 

2. Commando 

3. V 

4. Green Beret 

5. Formula One Simulator 

6. Way Of The Tiger 

7. Last V8 

8. Comp. Hits 10 Vol 2 

9. They Sold (2) 

10. One Man And His Droid 

11. Superbowl 

12. Spellbound 

13. Finders Keepers 

14. Turbo Esprit 

15. Action Biker 

16. Spindizzy 

17. Starstrike 2 

18. Batman 

19. Yie Ar Kung Fu 

20. Off The Hook 


(Elite) 

(Elite) 

(Ocean) 

(Imagine) 
(Mastertronic) 
(Gremlin Graphics) 
(Mastertronic) 
(Beau Jolly) 

(Hit Squad) 

(Mastertronic) 

(Ocean) 

(Mastertronic) 

(Mastertronic) 

(Dureil) 

(Mastertronic) 

(Electric Dreams) 

(Realtime) 

(Ocean) 

(Imagine) 

(Off The Hook) 


Deluxe-Software für 
den Amiga 


B ereits ausgeliefert wer¬ 
den Deluxe-Paint und 
Deluxe-Print, das Programm 
Deluxe-Video soll folgen. 
Deluxe-Paint als Grafikpro¬ 
gramm arbeitet in allen drei 
Modi und erlaubt, jede der 
4096 Farben zu verwenden. 
Deluxe-Print und ein grafik¬ 
fähiger Drucker verwandeln 
den Amiga in eine Druckma¬ 
schine. Karten, Poster und 
Briefköpfe können entwor¬ 
fen und ausgedruckt wer¬ 
den. Dieses Programm ist 
kompatibel zu Deluxe-Paint. 
Deluxe-Video dient zum ein¬ 
fachen Entwerfen und Zu¬ 
sammenstellen von animier¬ 
ten Grafik-Sequenzen. Vi¬ 
deofilme können mit Com¬ 
putergrafik versehen und 
Computer-Videoclips er¬ 
stellt werden. 



Kane, Gerry: 

68000 Mikroprozessorhand¬ 
buch. 

McGraw-Hill-Verlag, Ham¬ 
burg, 1985; 135 Seiten, 35 
Mark. 

Kurze Übersicht über die Fa¬ 
milie der 68000-Mikropro¬ 
zessoren. Signale (Hard¬ 
ware) und Befehle (Soft¬ 
ware) als Grundlage für den 
Entwurf von 68000-Syste- 
men und deren Implementa¬ 
tion. 

Lüers/Stein: 

Atari ST für Einsteiger. 

Data Becker, Düsseldorf, 
1986; 262 Seiten, 29 Mark. 
Wie man sofort mit dem Atari 
ST zurechtkommt. Mit ferti¬ 
gen Programmen zum Ein¬ 
tippen, der Programmier¬ 
sprache Logo und einem 
Häppchen Computerge¬ 
schichte. 

Lüke, I. und P.: 

Der Atari 520ST. 

Markt & Technik-Verlag, 
Haar, 1986 (2. erw. Auf).); 
198 Seiten, 49 Mark. 

Für Besitzer und Interes¬ 
sierte. Die überarbeitete 
Auflage trägt den neuen 
Entwicklungen bei Atari 
Rechnung, beispielsweise 
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AT-Power in der 
Aktentasche 


Zwei kompakte Portables 
von Toshiba. 

N icht viel größer als eine 
Reiseschreibmaschine 
sind die beiden Portables 
T2100 und T3100 mit Plasma- 
Bildschirm. Dazu einge¬ 
baute 3,5-Zoll-Disketten¬ 
laufwerke mit 720 KB oder 
eine Festplatte 256 KB RAM, 
intern auf 640 KB ausbau¬ 
bar. Schnittstellen und zu¬ 
sätzliche Erweiterungsein¬ 
heit vergrößern den Einsatz¬ 
bereich. 



dem deutschen Betriebssy¬ 
stem und geänderten Aus¬ 
stattungsmerkmalen. 

Steiner, J. u. G.: 

GEM für den Atari 520ST. 

Markt & Technik-Verlag, 
Haar, 1986 (2. erw. Aufl.); 
344 Seiten, 52 Mark. 

Alles, was GEM für den An¬ 
wender interessant macht: 
Pull-Down-Menüs, Fenster- 
und Symboltechnik, Maus¬ 
bedienung. Für Fortge¬ 
schrittene der interne Auf¬ 
bau von GEM, alle unter 
diesem Betriebssystem ver¬ 
fügbaren Routinen und wie 
man sie über C aufruft. 

Vieillefond, C. : 
Programmierung des 68000. 

Sybex-Verlag, Düsseldorf, 
1985; 456 Seiten, 150 Abbil¬ 
dungen, 64 Mark. 

Für Besitzer von Macin- 
toshs, Sinclair QLs, Atari 
STs und Commodore Ami- 
gas. Der Autor geht sowohl 
auf die Hard- als auch die 
Software der 68000-Prozes¬ 
soren ein. Pinbelegung, 
Signale, Timing und Peri¬ 
pheriebausteine werden be¬ 
schrieben, der Befehlssatz 
wird dargestellt und an Bei¬ 
spielprogrammen erläutert. 


Digitaler Kassettenrecorder zur 
Datenspeicherung 


D ie analoge Datenauf¬ 
zeichnung, die bei übli¬ 
chen Kassettenrecordern 
am Home-Computer ge¬ 
nutzt wird, ist nicht beson¬ 
ders zuverlässig. Für Profi- 
Anwendungen kommt daher 
nur die digitale Aufzeich¬ 
nung in Frage, die aller¬ 
dings spezielle Laufwerke 
und Digitalkassetten erfor¬ 
dert. 

Für OEM-Anwend ungen 
konzipiert ist der Mini-Digi¬ 
tal-Kassettenrecorder 
MDCR II von Philips, der 
preislich zwischen Walkman 
und Floppy angesiedelt ist. 
Controller und serielles 
V24-Interface ergänzen das 
neue Laufwerk. Durch iden¬ 
tische Abmessungen kön- 


F ür faule Anwender drängt 
sich immer mehr der Ge¬ 
danke an eine Automation 
des Programmierens auf. 
Warum sollen Programme 
keine Programme schreiben 
können? Die Tüftler-Union 
in Österreich (A-6961 Wolf- 
urt) hat einen Programm- 
Generator für das Schneider 
BASIC entwickelt, der im 
Dialog mit dem Benutzer in 
Erfahrung bringt, was das 
Programm tun und wie es 
gestaltet sein soll. Anschlie- 


nen Controller und Laufwerk 
als ,.Sandwich“ aufeinander 
gepackt werden. 

Der busorientierte Control¬ 
ler kann von Computersy¬ 
stemen jeder Größe ange¬ 
steuert werden. Handsha- 
king erfolgt hardware- oder 
sof twa re m ä ßi g (R S232C- 
Protokoll), Übertragungsra¬ 
ten zwischen 150 und 19 200 
Baud sind wählbar. Die An¬ 
bindung sei denkbar ein¬ 
fach, ebenso die Program¬ 
mierung. Befehle und Sta¬ 
tusinformationen werden 
durch ESCAPE-Sequenzen 
übermittelt. Die Speicherka¬ 
pazität beträgt 100 KB pro 
Spur, in 95 Sekunden ist das 
Band beschrieben oder ein¬ 
gelesen. 


ßend schreibt er mit Hilfe 
des eingebauten Syntax- 
und Algorithmenwissens 
das angestrebte Zielpro¬ 
gramm in ein File, das gela¬ 
den und mit anderen Pro¬ 
grammen durch ,,Merge“ 
vereint werden kann. Die er¬ 
zeugten BASIC-Programme 
sind frei zugänglich, list- 
und modifizierbar und ohne 
Urheberrechtsanspruch 
(der Urheber ist ja nicht der 
Mensch, sondern der Gene¬ 
rator). 


BOX 


Text-Paket 
für Einsteiger 

E in Textbearbei¬ 
tungspaket zum 
Einsteigerpreis bie¬ 
tet Triumph-Adler an: für 
weniger als 6000 Mark er¬ 
hält man den IBM-kom- 
patiblen PC Alphatronic 
P10, das Textprogramm 
Tex-Ass sowie den Ty¬ 
penraddrucker TRD 7020. 
Speziell kleineren und 
mittleren Betrieben wird 
damit eine Konfiguration 
angeboten, mit der 
Briefe, Aufträge und Ab¬ 
rechnungen erstellt so¬ 
wie Adreßdateien verwal¬ 
tet werden können. 


Farbausdrucke 
vom Atari ST 

F ür den Thermotrans- 
fer-Drucker TPX-80 
hat C.ltoh Electro¬ 
nics ein ROM entwickelt, 
das Atari ST-Anwendern 
den Ausdruck von Farb- 
hardcopys im Format DIN 
A4 ermöglicht. 


Ein Drucker für zwei 
Computer 

D er Schnittstellen- 
verdoppler 2C/C/ 
00 von Wiesemann 
erlaubt, einen Drucker 
mit Centronics-Eingang 
gleichzeitig an zwei 
Computer anzuschlie¬ 
ßen. Die Umschaltung 
erfolge automatisch, es 
sei keinerlei Bedienung 
oder Software dazu nö¬ 
tig: Derjenige Rechner, 
der als erster ein Zeichen 
an den Drucker sendet, 
sperrt den anderen Com¬ 
puter. Erst wenn einige 
Sekunden nichts mehr 
gedruckt wird, erfolgt 
wieder die Freigabe. 



Programm-Generator für Schneider-BASIC 
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Freaks und Chips in der DDR 


Ein harter, mühevoller Weg 
zum eigenen Computer, Wu¬ 
cherpreise für die Software. 
Gäbe es nicht die treuherzi¬ 
gen Großmütter aus dem 
Westen, sähe es für Compu¬ 
terbegeisterte schlecht aus. 
s gibt sie, die Computer¬ 
szene in der DDR, doch 
sie hat mit beträchtlichen 
Schwierigkeiten zu kämp¬ 
fen. Weder vom eigenen 
Staat noch von anderen 
Ländern kann sie Unterstüt¬ 
zung erwarten. Die dortige 
Industrie arbeitet mit dem 
Z80-Prozessor unter dem 
Namen U-880. Es gab sogar 
zwei Home-Computer mit 
dieser CPU, doch die Aus¬ 
lieferung wurde inzwischen 
eingestellt. 

Was bleibt dem computerin¬ 
teressierten DDR-Bürger, 
der nicht die Möglichkeit 
hat, sich einen Rechner für 
zu Hause anzuschaffen? Be¬ 
ziehungen in das westliche 
,.Ausland“, um sich von dort 
einen Mikro kommen zu las¬ 
sen. Doch selbst das ist mit 
Schwierigkeiten verbunden, 
denn der Export von Mikro¬ 
computern oder Zubehör in 
die DDR ist verboten, da sie 
ja für militärische Aufgaben 
eingesetzt werden könnten. 
Man stelle sich einmal einen 
ZX-81 in einer strategischen 
Leitzentrale vor! So bleibt 
nichts anderes übrig, als 
das Gerät zu schmuggeln. 

In den abenteuerlichsten 
Verstecken werden Compu¬ 
ter in das Land geschafft. Da 


sich die kleinen Sinclair- 
Rechner sogar unter dem 
Pullover transportieren las¬ 
sen und der Z-80-Prozessor 
der Star des dortigen Com¬ 
puterhimmels ist, gehören 
ZX-81 und Spectrum zu den 
verbreitetsten Modellen. An 
dritter Stelle folgt der Com- 
modore 64, der wegen sei¬ 
nes Formats nicht so leicht 
zu verbergen ist. In etlichen 
Fällen ist das jedoch ge¬ 
glückt, und mancher 64er 
wandert unbemerkt in der 
Reisetasche der Großmut¬ 
ter, die ihren Enkel besu¬ 
chen möchte, über die 
deutsch-deutsche Grenze. 
Doch die Computerbegei¬ 
sterten, die nicht mit solch 
warmherzigen Großmüttern 
gesegnet sind, möchten 
auch gerne einen Mikro in 
der guten Stube haben. Ih¬ 
nen bleibt nur der Weg des 
Eigenbau-Modells. Es kann 
sich über viele Monate, 
manchmal sogar Jahre, hin¬ 
ziehen, bis der natürlich mit 
einer Z80-CPU arbeitende 
Rechner läuft. Denn der Ein¬ 
zeltei le-Markt sieht nicht an¬ 
ders aus als der sonstige: 
Entweder es ist etwas da, 
oder eben nicht. 

Die Hardware-Beschaffung 
ist nicht das einzige Pro¬ 
blem. Was dann immer noch 
fehlt, ist die Software, die 
eine Nutzung erst ermög¬ 
licht. Da tut sich im Lande 
eigentlich gar nichts. Außer 
einem Verbot, Computer¬ 
programme für den privaten 


Sektor zu handeln. Die Ein¬ 
fuhr von Datenträgern in die 
DDR ist ebenfalls untersagt, 
doch wen überrascht es, 
wenn die Freaks trotzdem 
mit westlichen Programmen 
zugange sind. 

Die glücklichen Besitzer 
nutzen das allerdings sehr 
zu ihrem Vorteil aus und ver¬ 
kaufen ihre Kopien zu recht 
stattlichen Preisen. Zähne¬ 
knirschend blättern die Ka¬ 
meraden die Ostmark¬ 
scheine auf den Tisch, denn 
wie sonst sollten sie an das 
Computerfutter gelangen. 
Allerdings haben die Ge¬ 
schäftstüchtigen vorher für 
ihre Originale kräftig berap¬ 
pen müssen. Nicht selten 
sind Diplomaten ihre Quel¬ 
len, die aus den ,.richtigen“ 
Ländern das Handelsgut 
mitbringen und es zum fünf¬ 
fachen Einkaufspreis - 
plus einer Transportgebühr 
— veräußern. Auf dem 
Schwarzmarkt sind vor allem 
Spiele wie Pac Man vertreten. 
Da hilft nur eins: Man muß 
sich eigene Programme 
schreiben. Doch gilt auch 
hier der allgemeine Wahl¬ 
spruch der DDR: Wo ein Ziel 
ist, gibt es auch genügend 
Hindernisse, um den Weg 
dorthin zu verbauen. Größte 
Barriere ist die nicht vorhan¬ 
dene Einsteiger-Literatur. 
Kein einziges BASIC-Lehr- 
buch ist öffentlich zu kaufen. 
Es gibt zwar wenige einfüh¬ 
rende Schriften, doch sind 
diese viel zu theoretisch. 


Wir, die wir gerade HC le¬ 
sen, können an jedem Kiosk 
auf einen Berg von Compu¬ 
ter-Zeitschriften zurückgrei¬ 
fen. In der DDR gibt es über¬ 
haupt keine. Lediglich zwei 
Elektron ik-Fach blätter ha¬ 
ben eine Rubrik ,,Mikro¬ 
computer“. Darunter findet 
man aber keine Tips und 
Tricks, sondern liest aus¬ 
führlich, wie Betriebe ihren 
Computer einsetzen. Bleibt 
wieder nur der Lesestoff aus 
dem Westen. Den gibt es 
natürlich nicht am Kiosk, 
auch ein regelmäßiger Be¬ 
zug aus der Bundesrepublik 
ist untersagt. Einzige 
Quelle: Die Staats- und 
Stadtbibliothek in Berlin 
und die Stadtbibliothek in 
Leipzig, wo man auch CHIP 
und HC findet. Allerdings 
erst nach Monaten die 
,,neueste" Ausgabe. 

Woran die Computerszene 
in der DDR bislang am mei¬ 
sten krankt, ist die man¬ 
gelnde Kooperation der 
Freaks. Wie sollten sie sich 
auch finden, wenn es weder 
Kontaktanzeigen in Zeit¬ 
schriften noch Treffpunkte in 
Fachgeschäften gibt. Viel 
Ausdauer und Eigeninitia¬ 
tive gehört zum Computern 
in der DDR. Deshalb freuen 
sich die User am meisten, 
wenn sie von Computer¬ 
clubs aus dem Westen Tips 
und Hilfestellungen bekom¬ 
men. Dabei muß man ja 
nicht gleich zum Schmugg¬ 
ler werden. Thomas Tai 




Computer-Display an 
V.24-Schnittstelle 


F ür manche Anwendun¬ 
gen genügt es, wenige 
alphanumerische Daten den 
Rechner anzeigen zu las¬ 
sen. Ein Bildschirm ist dann 
zu groß und benötigt Netz¬ 
anschluß. Abhilfe schafft die 
neue LCD-Anzeige, Typ 
81000, von Wiesemann in 
Wuppertal. Die etwa 400 
Mark teuren Anzeigemodule 
werden an eine V24-Schnitt- 
stelle des Rechners ange¬ 


schlossen und sind über 
Steuercodes adressierbar. 
Bis zu zehn Stück können 
gleichzeitig eingesteckt und 
einzeln angesprochen wer¬ 
den. 

Das Display zeigt zwei Zei- 
len'zu je 16 Zeichen, alpha¬ 
numerisch in Punktmatrix 
an. Übertragungsrate: 300 
bis 9600 Baud, 7 oder 8 Da¬ 
tenbit. Stromversorgung 
über die Schnittstelle. 
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C 64-Bi bei 

in Neuauflage 

Das 64 INTERN, unter Insidern als «Bibel des C64' bekannt, ist seit 1983 das Standardwerk 
zum meistverkauften Computer der Welt. Die nun komplett überarbeitete und stark erweiterte 
Neuauflage bringt noch mehr Facts und Details für alle C64-Freaks. Allein in Deutschland 
haben weit über 90000 Käufer ihren Rechner durch dieses Buch erst richtig kennengelernt. 

Das über viele Jahre gesammelte Know-how des DATA BECKER Teams ist in diese Hard¬ 
cover-Neuauflage eingeflossen: 

• BASIC-Interpreter für Insider, interner Aufbau von BASIC-Programmen, Liste aller Arith¬ 
metik- und Befehlsroutinen des BASIC-Kernel. 

• Speicherverwaltung des VIC-Chips, Zeichensatzprogrammierung incl. Multicolormodus, 

Rasterzeileninterrupt für eigene Programme, Soft-Scrolling, Tabelle aller Register des VIC- 
Chips. 

• Alle Möglichkeiten der Speicheraufteilung durch den Adressmanager incl. Zuschal¬ 
tung externer ROMs. 

• Profi-Musikprogrammierung mit dem SID-Sound-Chip, alle Register, Bedeutung der 
Hüllkurven und der notwendigen Musiktheorie. 

• Perfektes Detailwissen zur Assemblerprogrammierung, Supermonitor zum Abtip¬ 
pen incl. Assembler und Disassembler, Programmierung der Interrupts, Einbinden 
von Betriebssystemroutinen in eigene Programme, alle 6510-CPU-Befehle auf einen 
Blick incl. der Illegalen Opcodes und deren Taktzyklen. 

• Vollständiges BASIC- und Betriebssystem-ROM-Listing mit zeilenweiser Doku¬ 
mentation und Cross-Referenz, Einführung in die Benutzung des ROM-Listings, Tips & 

Tricks für die eigene Programmierung, stark erweiterte Dokumentation der Zeropage. 

• Extra-Kapitel über den neuen Commodore 64 C, GEOS und die Mausprogrammierung. 

• C64-Tuning, Resetschalter über USER- und Expansion-Port, Pflege und Wartung incl. Testprogramm für Joystick, Tastatur, 

RAM-Test, Testbild und Sound, Fehlersuchplan zur eigenen Fehlerdiagnose incl. Originalschaltpläne von Commodore. 

Dieses umfassende und vollständige Standardwerk darf in keiner C64-Bibliothek fehlen. 

Des Kaisers neue Kleider: GEOS 

Wir sind der Meinung, daß ein Betriebssystem nur so gut ist, wie die Dokumentation, die es dazu gibt. Von DATA BECKER gibt es deshalb das große GEOS-Buch. 
Angefangen bei einer perfekten Bedienungsanleitung mit vielen Anregungen und Tips & Tricks bis zum detaillierten Programmers Reference Guide liefert das große 
GEOS-Buch alle Informationen, die Sie für die eigene Programmerstellung unter GEOS brauchen. 

GEOS für Einsteiger enthält eine bildschirmorientierte Einführung in das Arbeiten und den Umgang mit GEOS-Desktop, GeoPaint und GeoWrite. 

GEOS für Kreative steckt randvoll mit Ideen für eigene GEOS-Projekte. 

GEOS Tips&tticks ist eine Fundgrube für jeden ernsthaften GEOS-Programmierer: 

• Echtzeituhr immer im Blick 

• Eigene Programme im GEOS-Look 

• Sinnvolle Anwendungen und Erweiterungen der eingebauten Alarmfunktion 

• Effektive und schnelle Steuerung aller GEOS-Funktionen über die Tastatur 
Und der Clou: 

• GEOS resident im Speicher. Dadurch ist es erstmals möglich, von GEOS aus selbst¬ 
erstellte Programme zu laden und zu starten, ohne das GEOS-Kernel zu löschen. 

GEOS INTERN ist die detaillierte und ausführliche Dokumentation des GEOS-Kernel. Aus 
dem Inhalt: 

• Die Fensterroutinen 

• Mausprogrammierung mit dem IRQ, Joystick- und Tastaturabfrage 

• Das spezielle Grafik-Format von GEOS. Konvertierungsprogramme zum Austausch 
von Grafik und Text 

• Die präzise Beschreibung der Jobstruktur ermöglicht das Einbinden von eigenen 
Routinen in GEOS. 

• Die Fast-Load-Routinen von GEOS in eigenen Programmen nutzen. 

• Die komplette Filestruktur von GEOS, zur Erstellung von eigenen DESK- 
Accessories. 

• Für echte Systemprogrammierer wichtig sind die Hilfsprogramme 
Lupe und Einzelschrittsimulufor. Mit der Lupe kann der Inhalt belie¬ 
biger Speicheradressen auf dem Bildschirm sichtbar gemacht 
werden. Im Einzelschrittmodus zeigt GEOS ständig die Inhalte 
aller Register der CPU und deren Status an. / * 

GEOS beweist, das der C64 noch lange nicht out ist. y' ^\<. 

Sichern Sie sich mit dem KNOW HOW dieses Buches X v ^ 



Das große GEOS-Buch 
Hardcover, ca. 350 Seiten, DM 49,- 


DATA BECKER 

Merowingerstr. 30 • 4000 Düsseldorf Tel. (0211) 310010 



den Vorsprung, den Sie brauchen, denn in Zukunft 
wird Profi-Software unter GEOS laufen. 



Spielend lernen ist 
ein Wunschtraum 
geplagter Schüler. 
Doch ein Computer 
ist keine Wunder¬ 
maschine 

E ine Zeitlang sah es so aus, als 
ob der „Braunschweiger Trich¬ 
ter“ (nach der Produktions¬ 
stätte eines weit verbreiteten 
Home-Computers) alle Lernpro¬ 
bleme beseitigen könnte: Als näm¬ 
lich neben den Geschicklichkeits¬ 
und Ballerspielen eine reiche Aus¬ 
wahl an Lernspielen auf den Markt 
kam, die den schwachen Schülern 
den Nachhilfelehrerersetzen sollte. 

Endlich gab es ein gewichtiges 
Argument für die stundenlange 
Beschäftigung mit diesen Kisten. 
Und die Erziehungsverpflichteten 
sahen es mit Wohlwollen, denn 
schließlich sollen er oder sie etwas 
fürs Leben damit lernen. Fast jeder, 
so steht es ja in den Zeitschriften, 
wird in Zukunft mit Computern zu 
tun haben. Doch langsam werden 
auch Zweifel laut, ob der schwanz¬ 
wedelnde Löwe oder die angriffslu¬ 
stigen Vokabeln wirklich dem Bil¬ 
dungsdrang so förderlich sind 


LERNEN 

NN 

COMPUTER 




Der elektronische 

Pauker 


oder nur ein weiteres Spiel darstel¬ 
len und vom eigentlichen Lernstoff 
ablenken. 

Daß das Spielen ein wichtiger 
Bestandteil unseres Lebens ist, 
kann niemand bestreiten. Auch 
nicht, daß es zum wirkungsvollen 
Lernen gehört. Allerdings dienen 
spielerische Elemente in unseren 
Bildungsstätten nur vordergründig 
der Auflockerung. Dahinter steckt 
die Leistung, die zu erbringen ist 
— und die letztendlich zu einer Be¬ 
wertung, einer Note führen soll. 
Beispiele dafür: Zahlenspiele, 
Städte raten, Vokabeln im Wett¬ 
streit üben. An diesen Vorbildern 


orientieren sich die klassischen 
Computer-Lernspiele. „Belohnt“ 
werden richtige Antworten durch 
Melodien, die der Rechner von 
sich gibt, oder durch bewegte Gra¬ 
fiken: Männchen wandern eine be¬ 
stimmte Strecke vorwärts, Punkte 
werden aufgesammelt oder Fehler¬ 
teufel vernichtet. Ist dabei das 
Spiel zu sehr betont, wird der Lern¬ 
stoff selbst zur Nebensache. Frag¬ 
lich ist, ob das nützt oder nur eine 
Anbiederung an spielgewohnte 
Freaks darstellt. 

Lernspiele bergen auch die Ge¬ 
fahr in sich, daß der Lernende auf 
einen reinen Maschinen-Dialog 


trainiert wird, der aus dem Drücken 
von Tasten oder Joystick-Bewe¬ 
gungen besteht. Damit kommt eine 
wichtige Aufgabe des Lernens zu 
kurz, die soziale Erziehung, die 
Ich-Erfahrungen in der Gemein¬ 
schaft, die Team-Arbeit, Toleranz 
und Gemeinschaftssinn. 

Ausschließliches Lernen mit 
Computerprogrammen darf und 
wird es auch nicht geben. Wer län¬ 
gere Zeit vor dem Bildschirm sitzt, 
wird dies als sehr belastend emp¬ 
finden. Der leichte Zugriff auf ge¬ 
speicherte Informationen darf nicht 
dazu führen, daß nur noch diese 
vermittelt werden — und nicht 
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mehr die Beobachtung und Aus¬ 
wertung der Wirklichkeit, von Ex¬ 
perimenten (leider ist bei vielen 
Wissenschaftlern dieser Trend zu 
sehen). Schließlich werden wir von 
Tag zu Tag ärmer an ursprüngli¬ 
cher Erfahrung. Wie unsere Kom¬ 
munikation sich unter dem Einfluß 
der Arbeit mit dem Computer än¬ 
dern wird, können wir im Augen¬ 
blick nicht absehen. Die einfach 
strukturierte Dialogsprache der 
Programme könnte unsere sprach¬ 
liche Entwicklung prägen. 

Doch schließlich entstehen mit 
der neuen Generation an Home- 
Computern mit mehr Speicher und 
besseren Grafikfähigkeiten auch 
neue Möglichkeiten für Programm¬ 
konzeptionen, die der ,,künstli¬ 
chen Inteligenz“ ein Stück näher 
kommen. Zumindest theoretisch 
werden Programme möglich, bei 
denen der Computer nicht mehr 
stumpfsinnig Wissen abfragt und 
mit einfältigen Antworten wie 
„Richtig — gratuliere!“ oder 
„Falsch — versuche es noch ein¬ 
mal“ kommentiert, sondern gezielt 
auf das Wissen des Lernenden rea¬ 


giert, um beispielsweise Denkan¬ 
stöße zu geben, Vergleiche heran¬ 
zuziehen, Wissen aus anderen 
Gebieten einfließen zu lassen. Eine 
aktive Auseinandersetzung mit 
dem Stoff wäre das Ziel. Möglich 
wäre es, wenn sich der Computer 
wie ein idealer Lehrer verhielte: 
Wenn er den Lernenden ermuti¬ 
gen, ihm nicht Verstandenes auf 
andere Weise verdeutlichen 
könnte, wenn er — mit Hilfe von 
Bildplatten, CD-ROM und anderen 
interaktiven Systemen — den Stoff 
mit Grafiken und Bildern unterma¬ 
len, also von selbst Hilfsmittel be¬ 
reitstellen könnte, die zur Vermitt¬ 
lung von Lerninhalten nötig sind. 

Mit solchen Programmen stün¬ 
den nicht nur intelligente „Lehrer“ 
zur Verfügung, sondern auch die 
Möglichkeit, das Wissen über mo¬ 
derne Lehrstrategien aus vielen 
Quellen zusammenzufassen, ähn¬ 
lich der „künstlichen Intelligenz“ 
auf anderen Gebieten, die vorerst 
auch nichts anderes ist als Wis¬ 
sensansammlung von Experten für 
denjenigen, der dieses Wissen 
nicht hat. Doch damit wird der Leh¬ 
rer aus Fleisch und Blut keines¬ 
wegs arbeitslos! Lernen ist 
schließlich nicht nur Aufnehmen 
von Fakten. Die Gemeinschaft der 
Lernenden, der Wettbewerb in der 
Gruppe, der Ansporn, das Erfolgs¬ 
erlebnis läßt sich am Computer 
nicht nachvollziehen. -reh 


Textprogramme helfen 
gegen Schreibschwächen 

Erfahrungen aus der Praxis: So 
kann richtig Schreiben und Lesen 
geübt werden 

Mit „Legasthenie“ bezeichnet 
man eine Lese- und Rechtschrei¬ 
beschwäche, die viele Ursachen 
haben kann. Ein Schüler schreibt 
beispielsweise „Hoite ist es ser 
hais“ — was der üblichen Sprech¬ 
weise entspricht. Wie kann ihm ge¬ 
holfen werden? 

Fehl am Platz sind starre Pauk- 
programme und einseitige Diktat¬ 
übungen. Im Vordergrund sollten 
Aufgabenstellungen stehen, die 
ein selbständiges Arbeiten mit Tex¬ 
ten zum Ziel haben. Seit fast 15 
Jahren trainieren wir auf vielfältige 
Weise mit dieser Zielgruppe und 
machen seit Monaten die besten 
Erfahrungen beim Einsatz von 
Textverarbeitungsprogrammen. 

Allerdings ist bei der Anschaf- 


Programme für jeden 
Zweck 

Zu fast jedem Lernstoff gibt es 
inzwischen Programme. Hierein 
Überblick über Themen und ihre 
Anbieter - ohne Anspruch auf 
Vollständigkeit. 

Fremdsprachen 

Data Becker (für C64); 

Ernst Klett Verlag (für Apple II); 
Intus Lern-System (für Apple); 
Langenscheidt (für C64); 

Markt & Technik (für C64); 

Max Hueber Verlag (für C64, ZX 
Spectrum); 

SM Softtraining (für C64); 
Westermann Schulbuchverlag 
(für C64); 

Wilhelm Hagemann (für C64, VC 
20 ). 

Deutsch (Grammatik und Recht¬ 
schreibung) 

Atari GmbH (für Atari 400/600/ 
800 XL); 

Intus Lern-System (für Apple II); 
Westermann Schulbuchverlag 
(für C64). 

Mathematik 

Bayerischer Schulbuch-Verlag 
(für C64); 

Data Becker (für C64); 

Ernst Klett Verlag (für C64); 
Intus Lern-System (für Apple II); 
Sybex Verlag (für C64); 
Westermann Schulbuchverlag 
(für C64); 

Wilhelm Hagemann (für C64, VC 
20 ). 

Biologie, Chemie, Physik 

Intus Lern-System (für Apple II). 

Schreibmaschinenkurs 

Ariola Eurodisk (für C64); 

Atari GmbH (für Atari 600/800 
XL); 

Intus Lern-System (für Apple II); 
Triumph Adler (für TA alphatro- 
nic PC) 


fung auf folgende Punkte unbe¬ 
dingt zu achten: 

* Groß-/Kleinschreibung mög¬ 
lich? 

* Umlaute (ä,ö,ü) vorhanden? 

* ,,ß“-Schreiben da? 

Leider sind diese Mindestanfor¬ 
derungen sogar bei speziellen 
Deutschprogrammen nicht immer 
verwirklicht (zum Beispiel nicht 


Nr. 9 —September 1986 


HC 15 






Lernen am Computer: Fünf Commodore im Verbund 


beim ,,Rechtschreiblöwen“ von 
Westermann). Sie kommen dann 
für ein Training zur Überwindung 
der Lese- und Schreibschwäche 
nicht in Frage. 

Wünschenswert wären außer¬ 
dem leichtes Erlernen und einfa¬ 
che Handhabung, Hervorhebung 
einzelner Wörter oder Merksätze 
durch Fettdruck oder Unterstrei¬ 
chen sowie vielseitige Anwen¬ 
dungsmöglichkeiten. 

Welche Vorteile bieten die Text¬ 
verarbeitungsprogramme? Sie ge¬ 
statten das Lernen an frei gestalte¬ 
ten Texten (dies ist wichtig zur 
Identifikation, denn fremde Texte 
interessieren den Lernenden weni¬ 
ger). Sie ermöglichen das Erstel¬ 
len gezielter Lückentexte, in die 
Wortteile oder ganze Wörter einzu¬ 
setzen sind. Sie erlauben den Ent¬ 
wurf von Übungsblättern und spä¬ 
ter auch deren Ausgabe auf den 
Drucker. Wichtig, wenn man be¬ 
stimmte Wortteile oder Regeln her¬ 
vorheben möchte. Sie verlangen 
und fördern eine sehr genaue Ar¬ 
beitsweise. Sie bieten Korrektur¬ 
möglichkeiten schon am Bild¬ 
schirm, ehe ein Text zu Papier 
gebracht wird — das Gesamt¬ 
schriftbild bleibt sauber! 

Lesen und Schreiben per Com¬ 
puter unterstützt durch die Druck¬ 
schrift eine bessere Durchgliede¬ 
rung des Wortbildes und vermeidet 
durch die Eingabe von Einzel¬ 
buchstaben das für Legastheniker 
oft unangemessene Schreibtempo 
der Schreibschrift. Das gilt übri¬ 
gens auch für die Arbeit mit einer 
ganz normalen Schreibmaschine, 
bei der man aber keine Fehler so 
einfach beheben kann. 

Und schließlich erhält jeder An¬ 
wender eines Textverarbeitungs¬ 
programms eine erste Einführung 
in die EDV, was auch zu schätzen 
ist. Außerdem werden Lernende 
am besten durch Erfolgserlebnisse 
zur Weiterarbeit motiviert. 

Unsere Vorschläge: Wegen der 
guten Erlernbarkeit (bereits zwölf¬ 
jährige Schüler haben damit gear¬ 
beitet) empfehlen wir das weit ver¬ 
breitete, allerdings auch etwas 
teure Textverarbeitungsprogramm 
,,Vizawrite“. Etwas Hilfestellung 
zum Verständnis des umfangrei¬ 
chen Handbuchs ist jedoch rat¬ 
sam. Ebenfalls in Frage kommt 
,.Startexter“ (Sybex). Das Hand¬ 
buch ist verständlich geschrieben, 
mit der Version 4.0 läßt sich gut 
arbeiten. 


Lernsoftware - aus der Pra¬ 
xis entwickelt 

Nicht am grünen Tisch, sondern in 
der Schule wurde ein Programm 
entwickelt, das Lehrern die Arbeit 
erleichtern soll 

Über einen Multi-User-Zusatz 
und eine Floppy 1541 steuert der 
Schweizer Realschullehrer Armin 
Rosenast sechs C64-Computer in 
seinem Klassenzimmer. Was dabei 
herauskommen kann, zeigt eine 
neue Software mit dem Titel „Lern¬ 
kartei“. Es handelt sich hierbei um 
eine Lernsoftware, die in dieser 
Form neu ist. Nicht nur ein Trai¬ 
ningsprogramm für Rechtschrei¬ 
bung ist damit gegeben, sondern 
auch eine elektronische Gramma¬ 
tik. Darüber hinaus enthält die 
„Lernkartei“ auch noch Erdkunde, 
Biologie und mehr. 

Sie bietet weiterhin ein Eingabe¬ 
programm zur Erstellung eigener 
Lerndateien. Zusätzliche Leistun¬ 
gen sind Diskettenoperationen wie 
Formatieren und Druckeransteue- 
rung. 

Als Besonderheit aufgefallen: 
Aus den Dateien können einzelne 
Fragen zusammengestellt und auf 
diese Weise ganze Prüfungsbogen 
entwickelt werden. Wem das noch 
nicht genügt, der kann sich ein Ar¬ 
beitsblatt ausdrucken lassen und 
mit Hilfe des unsichtbaren Code¬ 
wortes „schubi“ die dazugehören¬ 
den Lösungen abheften. Klassen¬ 
arbeiten lassen sich auf diesem 


Weg besonders zeitsparend erstel¬ 
len. 

Derzeit gibt es dieses Programm 
für den C64 auf Diskette für etwa 90 
Mark beim Huesmann + Benz Ver¬ 
lag, Singen. Eine Schneider-Ver¬ 
sion und Datendisketten zu weite¬ 
ren Sachgebieten seien in Arbeit. 

Rüdiger Werner 


Bewertung 

Durch gute Menüsteuerung ist 
die Arbeitsweise nach kurzer 
Einarbeitungszeit weitgehend 
selbsterklärend. Rücksprung 
zum Hauptmenü ist fast immer 
möglich. Die Umlaute ä, ö, ü 
sind vorhanden, das „ß“ fehlt 
noch, soll aber in der neuen Ver¬ 
sion berücksichtigt werden. 

Das Anleitungsheft ist klar 
verständlich geschrieben, die 
zahlreichen Beispiele machen 
die Arbeit recht einfach. 

Der in der Vorabversion ver¬ 
wendete Wortschatz und die 
Grammatikübungen sind noch 
nicht in allen Fällen an den bei 
uns üblichen Standardwort¬ 
schatz angeglichen, um als typi¬ 
sches Schulprogramm zugelas¬ 
sen zu werden. Die Neufassung 
will unsere Verbesserungsvor¬ 
schläge berücksichtigen. 

Im Hinblick auf die vielfältigen 
Einsatzmöglichkeiten ist das 
Preis-Leistungs-Verhältnis ak¬ 
zeptabel. 
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HARDWARE 


B evor man die vielfältigen 
Möglichkeiten des Compu¬ 
ters und der verschiedenen 
Peripheriegeräte nutzen kann, muß 
zunächst einmal eine Verbindung 
zwischen der Konsole und dem an¬ 
geschlossenen Zusatzgerät herge¬ 
stellt werden. Hierbei kommt es 
nicht selten zu Schwierigkeiten, 
weil die Hersteller von Computern 
daran interessiert sind, dem An¬ 
wender Peripherie aus dem eige¬ 
nen Haus zu verkaufen. Aus die¬ 
sem Grund werden viele Anschluß¬ 
stellen vorgesehen, in die art¬ 
fremde Geräte nicht ohne weiteres 
Eingang finden. So ergeben sich 
für den Computerbesitzer die Fra¬ 
gen, ,.Welches Gerät kann ich an¬ 
schließen?“, „Wie wird eine ein¬ 
wandfreie Datenübertragung er¬ 
reicht?“ und „Was ist zu tun, wenn 
die Geräte unterschiedliche An¬ 
schlußstellen besitzen?". 

Bei Schnittstellen (engl. Interfa¬ 
ces) kann man zunächst einmal 
zwischen zwei Grundtypen unter¬ 
scheiden: Schnittstellen, die im 
Computer beziehungsweise Peri¬ 
pheriegerät integriert sind, also 
Anschlußbuchsen für Laufwerk, 
Drucker, Monitor, Joystick, Maus 
und Modem, sowie Schnittstellen, 
die zur Datenkommunikation zwi¬ 
schen zwei Geräte geschaltet wer¬ 
den. Hierbei handelt es sich meist 
um Schnittstellenwandler, die zum 
Beispiel die ausgehenden Daten 
eines Computers für einen Drucker 
mit anderem Anschlußsystem kon¬ 
vertieren, das heißt in einen für den 
Drucker verständlichen Code um¬ 
wandeln. Genaugenommen die¬ 
nen solche Interfaces also zur Da¬ 
tenübertragung zwischen Schnitt¬ 
stellen. Dank dieser Bauteile, die 
häufig von kleineren privaten Un¬ 




ternehmen angeboten werden, ist 
es möglich, Computer und Peri¬ 
pherie mit unterschiedlichen An¬ 
schlüssen zu verbinden. Unabhän¬ 
gig von der Art der Schnittstelle 


Große Schnittsteilen-Übersicht für Atari, 
Commodore, IBM PC und Kompatible, 

Schneider sowie Sinclair 
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und dem verwendeten Übertra¬ 
gungssystem bestehen alle Daten, 
die zwischen zwei Geräten übertra¬ 
gen werden, aus Binärinformatio¬ 
nen. So stellt zum Beispiel der 
Buchstabe ,,A“ nach dem vielge¬ 
brauchten ASCII-Code die Binärin¬ 
formation 1000001 dar. Auch an¬ 


dere Informationen, etwa spezielle 
Ausdruckskommandos, setzen 
sich aus Binärdaten zusammen. 
Bei der Datenübertragung werden 
diese Codes in elektrische Impulse 
umgewandelt und über Datenlei¬ 
tungen gesendet. Dabei erhält 
eine ,,1“ eine andere Stromspan¬ 


nung als die ,,0“. Obwohl es bei 
der Form der Schnittstellenan¬ 
schlüsse zum Teil große Unter¬ 
schiede gibt, haben sich bei der 
Übertragung solcher Binärdaten 
zwei Grundprinzipien weltweit 
durchgesetzt: die serielle und die 
parallele Datenübertragung. 


Serielle Datenübertragung 


Die am weitesten verbreitete 
Form der seriellen Datenübertra¬ 
gung findet sich in der RS232C- 
Schnittstelle (auch V.24-Schnitt- 
stelle). Hinsichtlich der Pinbele¬ 
gung und Bedeutung der übertra¬ 
genen Signale wurde von der IOS 
(International Organization for 
Standardization) die RS232C- 
Schnittstelle unter dem Standard 
2110 international genormt. Dieser 
Standard entspricht in Deutsch¬ 
land der DIN 66020. 


Bei der RS232C-Schnittstelle 
werden die Daten seriell, also hin¬ 
tereinander auf einer Datenleitung, 
übertragen. Zu Beginn des Trans¬ 
fers wird ein Startbit mit einer 
Spannung zwischen +3 und +15 
Volt zum angeschlossenen Gerät 
gesendet. Danach folgt der Binär¬ 
code des Zeichens oder Komman¬ 
dos, wobei eine ,,1“ einem Strom¬ 
impuls zwischen — 3 und —15 Volt 
und eine ,,0“ einem Impuls zwi¬ 
schen + 3 und +15Voltentspricht. 


Als Abschluß folgen 1, 1 V 2 oder 2 
Stoppbits. Sie übernehmen die 
Funktion einer Pause. Mit der 
RS232C-Schnittstelle lassen sich 
Datenübertragungsgeschwindig¬ 
keiten von 300 bis 19 200 Impulsen 
pro Sekunde erreichen. Das ent¬ 
spricht rund 37 bis 2400 Textzei¬ 
chen oder anderen Einzelinforma¬ 
tionen. Zum einwandfreien Betrieb 
einer RS232C-Schnittstelle müs¬ 
sen eine ganze Reihe von Einstel¬ 
lungen vorgenommen werden. 


Parallele Datenübertragung 


Die weltweit häufigste Parallel¬ 
schnittstelle wurde von der ameri¬ 
kanischen Firma Centronics ent¬ 
wickelt und ursprünglich nur in 
Druckern aus dem eigenen Hause 
eingebaut. Doch dank der ausge¬ 
reiften Technik dieses Systems 
wurde die Centronics-Schnittstelle 
von vielen anderen Herstellern 
übernommen. 

Im Gegensatz zur RS232C- 
Schnittstelle erfolgt hier die Über¬ 
tragung des Binärcodes auf acht 


Datenleitungen gleichzeitig, das 
heißt parallel. Aus diesem Grund 
spricht man bei der Centronics- 
Schnittstelle auch von der 8-bit- 
parallel-Schnittstelle. Mit diesem 
System können wesentlich höhere 
Übertragungsgeschwindigkeiten 
erreicht werden. Baud-Raten von 
150 KByte bis 1 MByte bei hoch¬ 
wertigen Geräten sind heute mög¬ 
lich. Das entspricht etwa 19 000 bis 
131 000 Zeichen oder Einzelinfor¬ 
mationen pro Sekunde. Die Strom- 


Schneider CPC: Vielfältige Möglichkeiten 


Der CPC 464 sowie die Nachfol¬ 
gemodelle bieten eine Mischung 
aus genormten und ungenormten 
Schnittstellen. An die Stromversor¬ 
gungsbuchse läßt sich neben dem 
Versorgungsstecker aus dem Mo¬ 
nitor noch ein externes Netzteil na¬ 
mens ,,MP-1“ anschließen. Da¬ 
durch wird der Betrieb zum Bei¬ 
spiel mit einem herkömmlichen 
Farbfernsehgerät möglich, was 
sich speziell für CPC-Besitzer an¬ 
bietet, die lediglich einen Grünmo¬ 
nitor betreiben und Grafiken oder 
ähnliches in Farbe sehen wollen. 
Das MP-1 besitzt seinerseits die 
Verbindungen zum Monitorein¬ 
gang und einen Ausgang zum 
Fernsehgerät (normaler Antennen¬ 
stecker). Die Monitorbuchse ist 


sechspolig für RGB (Rot, Grün, 
Blau), Luminance (Helligkeit), 
Synchronisation und Erdung. Die 
optimale Bildqualität wird zweifel¬ 
los mit einem Monitor erreicht. 
Beim Anschluß eines Fernsehers 
muß eine gewisse Unschärfe in 
Kauf genommen werden; die 80- 
Zeichen-Darstellung ist nur schwer 
lesbar. Leider trifft dies auch auf 
den Original-Farbmonitor von 
Schneider zu, der bei bestimmten 
Farbkombinationen kein befriedi¬ 
gendes Bild liefert. 

Genormt ist die neunpolige Joy¬ 
stick-Buchse mit ihren typischen, 
leicht angeschrägten Ecken, die 
den Anschluß von praktisch jedem 
marktüblichen Joystick erlaubt. 
Der Pferdefuß dabei: Schneider 


Spannung für binär ,,0“ liegt zwi¬ 
schen 0 bis 0,4 Volt und für binär 
,,1 “ zwischen 2,4 und 5 Volt. 

Neben den acht Datenleitungen 
kann die Centronics-Schnittstelle 
noch zahlreiche andere Datenlei¬ 
tungen aufweisen, die jeweils ver¬ 
schiedene Funktionen überneh¬ 
men und nicht standardisiert sind. 
So gibt es zum Beispiel zwei Hand¬ 
shake-Leitungen, die die aktuellen 
Betriebszustände der verbunde¬ 
nen Geräte signalisieren. 


hat den CPC mit lediglich einer 
Joystick-Buchse versehen, eine 
zweite befindet sich an dem haus¬ 
eigenen Joystick ,,JY-1“. Wer zwei 
Joysticks benötigt (zum Beispiel 
für Computerspiele) und nicht den 
relativ teuren JY-1 kaufen will, kann 
auf den freien Markt ausweichen 
und den Joystick-Adapter von Dy¬ 
namics anschaffen und zum Bei¬ 
spiel zwei Joysticks des Typs Com- 
petition Pro ,,Chief“ anschließen, 
die drei Feuerknöpfe besitzen. Als 
Druckeranschluß bietet der 
Schneider eine abgemagerte Cen¬ 
tronics-Schnittstelle. Abgemagert 
deshalb, weil zwei Stifte (Pins) we¬ 
niger verfügbar sind als üblich (18 
und 36). Aus diesem Grund ist es 
zwar möglich, jeden normalen 
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Ist denn so was 
bei uns erlaubt? 


Wer Karlheinz Försters Frage richtig beantwortet, 
kann Geld für den Führerschein gewinnen. 





Ich will die 2000 Mark für den Führerschein gewinnen. Auf 
jeden Fall erhalte ich kostenlos die Broschüre zum Thema 
Führerschein. Meine Lösung lautet: 

I Nein, so etwas gibt es nur in amerikanischen Filmen. 

[ J Ja, jedes Fahrzeug, das den Vorschriften des TÜV ent¬ 
spricht, darf auf bundesdeutschen Straßen fahren. 

Meine Anschrift 


(bitte postalisch richtige Schreibweise des Wohnortes, z.B. Postzustellbezirk) 


Vorname 








„Trike" nennt sich dieses heiße Gefährt, 
das mit 44 PS immerhin 150 km/h erreicht. 
Gewußt? Es lohnt sich immer, wenn man 
sich im Straßenverkehr gut auskennt: 
Bei Wüstenrot gibt es jetzt - mit etwas 
Glück - die Startgebühren umsonst. Klar ist, 
das Geld liegt nicht auf der Straße. Deshalb soll¬ 
ten Sie sich auch rechtzeitig um eine gewinnbringende 
Anlage der vermögenswirksamen Leistungen kümmern. Fra¬ 
gen Sie Ihren Wüstenrot-Berater nach dem neuen Rendite- 
Programm. Er weiß Bescheid. 

Vergessen Sie nicht, bis zum 10.10.1986 Ihren Gewinn- 
Coupon einzuschicken. Die richtige Antwort nimmt an der 
Verlosung von dreimal 2000 Mark für Führerscheine teil. 


- 


wüstenrot 


Zum Glück berät Sie Wüstenrot. 


Name 


Straße, Hausnummer 

|Di n 

PLZ 

11,9, , 


Wohnort 

11:9, , j 

Jahr der Schulentlassung 


Geburtsjahr 

An Bausparkasse Wüstenrot, WF/Jugendservice, 7140 Ludwigsburg 

270/C-3-2 






-,v 
















HARDWARE 


Drucker mit genormter Centronics- 
Schnittstellenbuchse anzuschlie¬ 
ßen, jedoch benötigt man ein spe¬ 
zielles Druckerkabel, das der Aus¬ 
gangsseite der Buchse des CPC 
entspricht. 

Mit ein klein wenig Geschick ist 
es allerdings leicht möglich, ein 
solches Kabel selbst herzustellen, 
wenn man ein 36adriges Flach- 



Spielfreudig: Die fehlende zweite 
Joystick-Schnittstelle läßt sich durch 
einen Adapter beheben 


bandkabel, einen ,,Double-Row''- 
Stecker mit 34 Positionen (zum 
Beispiel von Misco) und einen ge¬ 
wöhnlichen Centronics-Stecker 
kauft. Diese Teile werden nicht ge¬ 
lötet, sondern durch einen Klemm¬ 
verschluß Eins-zu-Eins verbun¬ 
den; das heißt: Pin 1 am Aus¬ 
gangsstecker muß mit Pin 1 am 
Eingangsstecker korrespondieren 
usw. Die Pins 18 und 36 werden 
ausgelassen. 

Ein besonderes Problem bei der 
Schnittstellenverbindung zu einem 
Drucker ergibt sich beim Schnei¬ 
der CPC durch den Umstand, daß 
Pin 14 vom Rechner aus mit Impul¬ 
sen versorgt wird, die bei den mei¬ 
sten Druckern einen Zeilenvor¬ 
schub bewirken. Dadurch entste¬ 
hen beim Ausdruck stets Leerzei¬ 
len. Man kann diese Verbindung 
entweder ablöten oder — wenn 
man, wie oben gesagt, ein Druk- 



Für das Joystick-Interface: Mit drei 
Feuerknöpfen gehört der Competition 
Pro Chief mit zum Feinsten 


kerkabel selbst herstellt - die Ver¬ 
bindung zu Pin 14 auslassen. 

Zu den wichtigsten Schnittstel¬ 
len des CPC zählt zweifellos die 
50polige Erweiterungsleiste, die 
den Computer mit einem externen 
Diskettenlaufwerk, Modem oder 
RAM-Erweiterungen verbindet (je¬ 
doch nicht alles gleichzeitig). Be¬ 
sitzer des CPC 464 wissen, daß zu¬ 
sammen mit dem 3-Zoll-Laufwerk 
auch das Disketten-Interface 
,,DDI-1 “ geliefert wird. Dieses In¬ 
terface wird auf die Erweiterungs¬ 
leiste gesteckt und stellt im Kern 
den von NEC, Rockwell und Intel 
vertriebenen Floppy-Disk-Control¬ 
ler (FDC) pPD 765 dar. Mit dem 
pPD 765 ist es möglich, die gesam¬ 
ten Leistungen des Diskettenbe¬ 
triebs zu vereinfachen und zusätz¬ 
lich in der Geschwindigkeit zu 
steigern. Systeme ohne ein ver¬ 
gleichbares Interface (zum Bei¬ 


spiel die Commodore-Disketten- 
station 1541) weisen einen höheren 
Konstruktionsaufwand vor, arbei¬ 
ten langsamer und sind umständli¬ 
cher zu programmieren. Der FDC 
des Schneider belegt 40 oder 50 
Pins und stellt alle Signale zur Ver¬ 
fügung, die für die handelsübli¬ 
chen Diskettenformate 8, 5V4, 3V2 
und 3 Zoll benötigt werden. Aus 
diesem Grund ist es theoretisch 
möglich, eine Schneider-Diskette 
in einem Format einzurichten, das 
zum Beispiel von IBM unter CP/M- 
86 benutzt wird. Sinnvoll genutzt 
werden kann dies, wenn ein 5V4- 
Zoll-Laufwerk angeschlossen wird 
und ein Anwender etwa eine Text¬ 
datei, die im Büro auf einem IBM 
geschrieben wurde, zu Hause auf 
dem CPC weiterbearbeitet. 

An das Expansion-Board kann 
auch eine RS232C-Schnittstelle 
angeschlossen werden, zum Bei¬ 
spiel wenn aus früheren Computer¬ 
zeiten ein entsprechender Drucker 
vorhanden ist, der sich nicht an 
den Centronics-Ausgang an¬ 
schließen läßt. 

Nützlich ist die 50polige Leiste 
auch für Musikexperten: Von 
Schneider-Data wird ein Analog/ 
Digital- bzw. Digital/Analog- 
Wandler namens ,,ADA-T‘ ange- 
boten, der sich direkt an eine Ste¬ 
reoanlage oder andere Musiksy¬ 
steme anschließen läßt und durch 
alle Programmiersprachen ansteu¬ 
erbar ist. Weitreichende Klangma¬ 
nipulationen (überden Musik-Chip 
AY-3-8912) in bester Qualität sind 
realisierbar. Wem diese Anschaf¬ 
fung zu kostspielig ist oder wer le¬ 
diglich die normale Tonausgabe 
zur Stereoanlage oder einem Kopf¬ 
hörer umleiten will, kann dies über 
die Anschlußbuchse am linken Ge¬ 
häuseteil erreichen. 


Commodore 64/128: Von Normung keine Spur 


Für keinen anderen Computer 
wurden und werden so viele Zu¬ 
satzgeräte angeboten wie für den 
Commodore 64. Da auch das 
Nachfolgemodell, der Personal¬ 
computer C128 die gleichen 
Schnittstellen vorweist wie der 64er 
(und darüber hinaus noch einige 
mehr besitzt), kann die bisherige 
Peripherie voll genutzt werden. 

Mit Ausnahme der Joystick- 
Buchsen und des Fernsehanten¬ 
nenanschlusses ist keine der Com- 
modore-Schnittstellen genormt. 


Das bereitet Usern, die auf den 
freien Markt ausweichen wollen, 
gewisse Anschlußschwierigkeiten; 
doch findige Fremdfirmen haben 
diese Probleme schon vor langem 
erkannt und eine nahezu unüber¬ 
schaubare Fülle an Adaptern, 
Schnittstellenkonvertern und funk¬ 
tionstüchtigen Zusatzschnittstel¬ 
len entwickelt, so daß es heute 
möglich ist, fast alles mit dem 
Commodore zu verbinden, was die 
Computerwelt hervorbringt. Trotz¬ 
dem gibt es ein grundsätzliches 


Ärgernis beim C 128: Die nützliche 
und professionelle 80-Zeichen- 
Darstellung ist nur mit einem 
neunpoligen Spezialkabel mög¬ 
lich, das — ähnlich wie die Joy¬ 
stick-Anschlüsse — leicht ange¬ 
schrägte Ecken vorweist. Für Um¬ 
steiger vom C64 zum 128er ist es 
also nicht möglich, mit dem alten 
Monitor 80 Zeichen darzustellen; 
hier stehen lediglich die gewohn¬ 
ten 40 Zeichen zur Verfügung, die 
über eine achtpolige Rundstecker¬ 
buchse gespeist werden. 
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Audio/Video 



CI 28 von hinten 

Von links 

nach rechts findet 
man Steck- 

otts i modul-Eingang, 
Kassettenport, 
j Serieller Aus- 

j gang, Video- 

Buchse, TV-Buch¬ 
se, RGBI-Buchse 
Von links nach rechts: 2x Joystick, und User Port 
Reset, Ein/Aus und Stromversorgung 



Pin 

Signal 

Pin 

Signal 

1 

LUMINANCE 

6 

CROMINANZ 

2 

GND 

7 

0. BELEGUNG 

3 

AUDIO OUT 

8 

0. BELEGUNG 

4 

VIDEO OUT 



5 

AUDIO IN 




Anschluß eines Monitors: Die achtpo/ige Rundstecker¬ 
buchse ermöglicht keine 80-Zeichen-Darstellung 



Cassette 


Pin 

Signal 

A-l 

GND 

B-2 

+ 5V 

C-3 

CASSETTE MOTOR 

D-4 

CASSETTE READ 

E-5 

CASSETTE WRITE 

F-6 

CASSETTE SENSE 


Der Kassettenport: Die 5-Volt-Spannungsquelle ist für 
den Anschluß eines Fremddruckers interessant 


Auf der anderen Seite haben die 
beiden Schnittstellen zum Bild¬ 
schirm einen Vorteil: Es ist nämlich 
möglich, zwei Sichtgeräte gleich¬ 
zeitig mit Darstellungen zu versor¬ 
gen. Dies ist für Anwender interes¬ 
sant, die zum Beispiel Text und 
Grafik gleichzeitig vor Augen ha¬ 
ben wollen. Als Schnittstelle zum 
Kassettenrecorder (Datacorder) 
dient beim C64/128 eine Stecklei¬ 
ste mit sechs Doppelanschlüssen. 

Auch für Anwender, die keinen 
Kassettenrecorder bzw. Datacor¬ 
der einsetzen, ist diese Schnitt¬ 
stelle hochinteressant, weil der An¬ 
schluß B-2 eine 5-Volt-Spannung 
liefert, die für den Betrieb vieler 
Commodore-fremder Drucker not¬ 
wendig ist. Der sechspolige se¬ 
rielle Rundbuchsenanschluß für 
den Commodore-Drucker liefert 
keine entsprechende Spannung. 
Der Anschluß eines Fremddruk- 
kers ist jedoch für viele Anwendun¬ 
gen sinnvoll, weil der freie Markt 
eine Reihe von intelligenten Druk- 
ker-lnterfaces hervorgebracht hat, 
die Funktionen ausführen, die nor¬ 
malerweise umständlich program¬ 
miert werden müßten; zum Bei¬ 
spiel eine Flardcopy-Funktion 
(Witte-Interface) oder sofortige 
Verfügbarkeit des hochauflösen¬ 
den Grafikmodus (Rocke-Inter- 
face). Daneben ist es möglich, die 
verschiedenen Computer-Modi 
(Grafik/Großbuchstaben, Klein-/ 
Großbuchstaben) durch einfache 
Parameterangaben im OPEN-Be- 
fehl original zum Drucker zu über¬ 
tragen, so daß auch ein Fremdge¬ 
rät (zum Beispiel Epson, Star) die 
Grafikzeichen des Commodore 


Pin 

Signal 

Bemerkung 

1 

GND 


2 

+ 5V 

MAX. 100 mA 

3 

RESET 


4 

CNT1 


5 

SP1 


6 

CNT2 


7 

SP2 


8 

PC2 


9 

SER. ATN IN 


10 

9 VAC 

MAX. 100 mA 

11 

9 VAC 

MAX. 100 mA 

12 

GND 


A 

GND 


B 

FLAG2 


C 

PBO 


D 

PB1 


E 

PB2 


F 

PB3 


H 

PB4 


J 

PB5 


K 

PB6 


L 

PB7 


M 

PA2 


N 

GND 


1 2 

3 4 5 6 7 8 9 

10 11 12 


ABCDEFHJ KLMN 


ausdrucken kann (Wiesemann-In¬ 
terface). 

Die Modulsteckleiste des Com¬ 
modore mit zweimal 22 Anschlüs¬ 
sen, die ursprünglich für EPROM- 
Software konzipiert war (fest pro¬ 
grammierte Software auf Speicher- 
Chips), hat inzwischen für andere 
Funktionen an Bedeutung gewon¬ 
nen. Hier ist besonders der Betrieb 
von Akustikkopplern hervorzuhe¬ 
ben. So wird zum Beispiel der As- 
com-Akustikkoppler mit Hilfe eines 
intelligenten Interface am Modul¬ 
steckplatz des C64/128 ange¬ 
schlossen und ist nach Laden der 
Diskettenbetriebs-Software ohne 
weiteren Programmieraufwand ein¬ 
satzbereit. 

Speziell für Bastler und Compu¬ 
ter-Experimentatoren ist die letzte 
Schnittstelle, das sog. User-Port, 
interessant. Diese Steckleiste aus 
zweimal zwölf Anschlüssen bietet 
äußerst flexible Funktionsmöglich¬ 
keiten, die allerdings mehr von 


Messen, Steu¬ 
ern, Regeln: 

Viele Erweiterun¬ 
gen greifen auf 
das User-Port zu¬ 
rück 



C64 im Zentrum: Die Relais-Box dient als Grundlage zur 
Steuerung externer Geräte 
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Elektronik-Erfahrenen genutzt wer¬ 
den können. 

Insbesondere wird das User-Port 
zum Messen, Steuern und Regeln 
verwendet. So ist es beispiels¬ 


weise denkbar, die Steckleiste mit 
einer Relais-Box zu verbinden, die 
ihrerseits eine Reihe von Schaltern 
darstellt, die vom Computer aus 
betätigt werden können. Mit sol¬ 


chen Relais lassen sich externe 
Geräte ansprechen (Modelleisen¬ 
bahn, Plattenspieler, Lampen 
usw.) oder auch Alarmanlagen ein- 
und ausschalten. 


Atari XL: Kabelsalat am seriellen E/A-Port 


Aufgrund des großen Erfolges 
von Commodore und später auch 
Schneider konnten sich die Atari 
XL-Geräte (600 XL, 800 XL) nicht in 
dem Maße durchsetzen, wie es der 
bedienungsfreundliche und lei¬ 
stungsfähige Home-Computer ver¬ 
dient hätte. Dennoch hat sich — 
ähnlich wie beim TI 99/4A — ein 
hartnäckiger Kern von begeisterten 
Atari-Usern gebildet, die in kleinen 
Clubs die nur spärlich bekanntge¬ 
gebenen Systemadressen und 
Schnittstellenbelegungen auspro¬ 
bieren mußten. Der allgemeinen 
Unart folgend, hatte auch Atari für 
seine XL-Geräte keine genormten 
Schnittstellen vorgesehen, son¬ 
dern versucht, den Anwender an 
die hauseigene Peripherie zu bin¬ 
den. Da sich der Rechner nicht so 
immens durchsetzte, hielt sich 
auch das private Schnittsteilen- 
Engagement von Fremdfirmen ge¬ 
genüber dem Atari in Grenzen. So 
konnte der User in vielen Fällen tat¬ 
sächlich nur auf die Atari-Geräte 
zugreifen, was vielleicht auch ein 
Grund für den schleppenden Er¬ 
folg gewesen sein mag. 

Wichtigste Schnittstelle ist zwei¬ 
fellos der serielle Ein-/Ausgabe- 
Port an der rechten Geräterück¬ 
seite. Über diesen 13poligen An¬ 
schluß werden sämtliche Periphe¬ 
riegeräte gesteuert: Kassettenre¬ 
corder, Drucker, Plotter, Disketten¬ 
station. Allerdings ergibt sich beim 
Betrieb mehrerer gleichzeitig an¬ 
geschlossener Geräte (etwa Dis¬ 
kettenstation und Drucker) schnell 
ein wirrer Kabelsalat, weil jedes 
weitere Gerät mit dem seriellen 
Port der vorgeschalteten Einheit 
verbunden werden muß und jedes 
dieser Geräte eine eigene Strom¬ 
versorgung mit extern angeschlos¬ 
senem Netzteil benötigt. 

Wer im Programmieren des Atari 
XL etwas fortgeschritten ist, kann 
die serielle RS232-Schnittstelle 
auch direkt ansprechen (durch 
OPEN oder XIO) und zum Beispiel 
die Baud-Rate verändern oder eine 
andere Zeichenübersetzung festle¬ 
gen. Dieser Port wird auch für spe¬ 
zielle Drucker-Interfaces benutzt, 


die atarifremde Drucker anspre¬ 
chen (zum Beispiel das Star-Inter¬ 
face, mit dem die serielle Daten¬ 
ausgabe zur parallelen zusam¬ 
mengefaßt wird und dadurch jeder 
marktübliche Centronics-Schnitt- 
stellen-Drucker betrieben werden 
kann). Als Bildschirmschnittstellen 
bieten die XL-Geräte den üblichen 
Fernseh-Antennenstecker sowie 
eine Rundbuchse für Monitoran¬ 
schluß. Hier ist es also möglich, 
zum Beispiel einen 40-Zeichen- 
Hantarex- oder Sanyo-Monitor an¬ 
zuschließen und damit die Bild¬ 
qualität erheblich zu steigern. Der 
Steckmodul-Eingang (Slot) an der 
Oberseite dient hauptsächlich für 
EPROM-Software, die gegenüber 
der Disketten- bzw. Kassetten- 
Software den Vorteil hat, gleich 
nach dem Einschalten des Gerätes 
ohne jede Wartezeit zur Verfügung 
zu stehen. Viele Computerspiele 
und kommerzielle Programme wur¬ 
den von Atari (hauptsächlich aus 
Kopierschutzgründen) in Form von 
Steckmodulen angeboten. Popu¬ 
lärster Vertreter ist hier das nahezu 
professionelle Textverarbeitungs¬ 
programm Schreiber, das heute 
von Atari nicht mehr produziert 
wird und für den es inzwischen 
eine Art ,,Schwarzmarkt“ gibt, auf 
dem das Programm zu höchstbie¬ 
tenden Preisen gehandelt wird. 
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Atari-Steckmodul: Das Text Pro¬ 
gramm Schreiber ist gefragt 


XL an Speicherkapazität gleichwer¬ 
tig wird. Leider ist diese Speicher¬ 
erweiterung relativ schwer, so daß 
sie gewissermaßen an der Rück¬ 
seite heraushängt und unstabil 
wirkt. Eine unvorsichtige Berüh¬ 
rung kann unter Umständen zum 
Absturz des Computers führen. 

An der rechten Seite der XL-Ge¬ 
räte befinden sich schließlich noch 
zwei neunpolige Joystick-Schnitt¬ 
stellen, die das bekannte, von Atari 
eingeführte abgeschrägte Ausse¬ 
hen zeigen und in die praktisch 
alle handelsüblichen Joysticks 
passen. 



Die Pinbelegung des Joystick¬ 
ports: 1 Joystick hoch, 2 Joystick 
runter, 3 Joystick links, 4 Joystick 
rechts, 5 Paddle links, 6 Feuerknopf, 
7 +5 Volt, 8 Masse, 9 Paddie rechts 

Die früheren Atari-Computer 400 
und 800 besaßen übrigens noch 
vier solcher Joystick-Anschlüsse. 
Wem die Feuerkraft oder die 
Schußfolge der normalen Joysticks 



Schnellschuß: Der Adapter ertaubt 
bis zu 20 Impulse pro Sekunde 


Das Erweiterungsport an der Ge¬ 
räterückseite ist hauptsächlich für 
600-XL-Besitzer interessant. An 
diese Schnittstelle wird das 64- 
KByte-Zusatzmodul angeschlos¬ 
sen, wodurch der 600 XL dem 800 


nicht genügt, kann für bestimmte 
Spiele zusätzlich einen Schnell¬ 
feuer-Adapter anschließen, der 
sich von einem Schuß pro Se¬ 
kunde bis 20 Schüsse stufenweise 
regulieren läßt. 
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Atari ST: Über dem Durchschnitt anschlußfreudig 


Mit den ST-Modellen (260, 520, 
1040) ist Atari eindeutig der Sprung 
in die Profiklasse gelungen. Dank 
einer komfortablen Benutzerfüh¬ 
rung mit Hilfe der Fenstertechnik, 
die in das Atari-Betriebssystem 
TOS eingebettet ist sowie durch 
weitgehend genormte Schnittstel¬ 
len, gelang es Atari, mit den ST- 
Geräten in kurzer Zeit die Gunst 
der Käufer zu erringen. 
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Vielseitig: Die Rückfront des Atari ST 


Über die üblichen Schnittstellen 
hinaus (Drucker, Joystick, Maus 
usw.) zeigen sich die ST-Computer 
besonders anschlußfreudig; so 
weist die Rückfront zwei fünfpolige 
Midi-Anschlüsse vor (für Midi-Ein- 
und -Ausgang). Midi (Musical In¬ 
struments Digital Interface) ist ein 
serielles Bussystem für musikelek¬ 
tronische Geräte. Praktisch alle 
Hersteller von elektronischen Mu¬ 
sikinstrumenten (Synthesizer, 
Drums, Effektgeräte usw.) haben 
sich inzwischen diesem Standard 
angeschlossen, so daß in Verbin¬ 
dung mit einem Computer (in die¬ 
sem Fall Atari ST) komplette Mu¬ 
sikanlagen und Heimstudios zen¬ 
tral gesteuert werden können. Je 
nach Software ist es zum Beispiel 
möglich, Musiknoten zu spei¬ 
chern, simultan oder sequenziell 
(ständige Wiederholung einer Me¬ 
lodiefolge im Hintergrund) abzu¬ 
spielen oder die vorhandenen Me¬ 


Computer 
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Strom-Zuleitung 


Kabelsalat: Jedes Zusatzgerät be¬ 
nötigt eine eigene Stromversorgung 


lodien rhythmisch und klanglich 
extrem zu manipulieren. 

Hinsichtlich der Stromversor¬ 
gungen hat Atari auch bei den ST- 
Modellen die etwas unglückliche 
Handhabung mit externen Netztei¬ 
len beibehalten. So wird für die 
Konsole und jedes Diskettenlauf¬ 
werk ein eigenes Netzteil benötigt, 
was leicht wieder zum Kabelsalat 
führt. Allerdings wird für den Moni¬ 
tor keine eigene Stromversorgung 
verwendet, sondern ein entspre¬ 
chendes (ungenormtes) Kabel von 
der 13poligen runden Monitor¬ 
schnittstelle zum Bildschirm ge¬ 
führt, wobei Pin 8 das Sichtgerät 
mit der notwendigen 12-Volt- 
Spannung versorgt. 

Das Diskettenlaufwerk wird 
ebenfalls über eine Rundbuchse 
angeschlossen, die jedoch gegen¬ 
über der Monitor-Schnittstelle 14 
Leitungen aufweist, wobei Pin 14 
für die Schreibschutz-Kontrolle zu¬ 
ständig ist. Wer den Nervenkitzel 
nicht scheut, kann diese Leitung 
ablöten und die Schreibschutz- 
Funktion außer Betrieb setzen. 



Ohne Probleme: Der Anschluß meh¬ 
rerer Diskettenlaufwerke funktioniert 
nach dem Kettenprinzip 


Wer sich mit einem Disketten¬ 
laufwerk nicht zufriedengibt und 
ein zweites Laufwerk anschließen 
will, muß insgesamt fünf Schnitt- 
stellen-Verbindungen auf sich 
nehmen: Stromversorgung für 
Laufwerk A, Computer-Eingangs¬ 
kabel, Interface-Kabel von Lauf¬ 
werk A zu Laufwerk B und Strom¬ 
versorgung für Laufwerk B. Einfach 
wird hingegen der Anschluß einer 
Harddisk (Festplatten-Speichersy- 
stem) gemacht. Wo bei anderen, 
weitaus teureren Personal-Compu¬ 
tern das gesamte Gerät für den 
Einbau einer Festplatte auseinan¬ 
dergenommen werden muß, bietet 
der ST einen einfachen Kabelan¬ 
schluß über eine 19polige Stecklei¬ 
ste, die seitlich ähnlich abge¬ 


schrägt ist wie eine Centronics- 
Schnittstelle. 

Anwenderfreundlich sind auch 
die beiden Schnittstellen für den 
Druckerund Modem (bzw. Akustik¬ 
koppler). Beim Druckeranschluß 
wurde auf das bewährte 8-bit-Cen- 
tronics-System zurückgegriffen, 
wodurch eine lebendige Vielfalt an 
frei angebotenen Druckern mit 
dem Atari ST betrieben werden 
kann. In der Regel muß dazu ledig¬ 
lich der gewünschte Zeichensatz 
installiert werden. Sofern der ein¬ 
gesetzte Drucker zur Darstellung 
von Bit-Image-Grafik (Einzelpunkt¬ 
grafik) eingerichtet ist, läßt sich je¬ 
derzeit ein bildschirmidentischer 
Ausdruck (Hardcopy) aufrufen. 

Rechts neben der Drucker- 
Schnittstelle (von hinten gesehen) 
befindet sich eine marktübliche 
RS232C-Schnittstelle, die zur Auf¬ 
nahme eines Modem- oder Aku¬ 
stikkoppler-Anschlusses dient. 
Diese Schnittstelle läßt sich sehr 
bequem vom Betriebssystem aus 
für den gewünschten Einsatz konfi¬ 
gurieren. Man muß dazu die Op¬ 
tion ,,RS232 Konfiguration“ anwäh¬ 
len. Es erscheint daraufhin ein 
Fenster mit allen wichtigen Ein¬ 
stellmöglichkeiten (Baud-Rate, 
Paritäts-Prüfung, XON/XOFF-Pro- 
tokoll usw.). In gleicherweise läßt 
sich auch der Druckeranschluß be¬ 
züglich Papierart, Zeilenabstand 
und ähnliches einstellen. 



Nostalgie: Zur Aufnahme von 

EPROM-Software ist wie bei der XL/ 
XE-Serie ein Schacht vorgesehen 


An der linken Geräteseite befin¬ 
det sich ein Cartridge-Schacht, der 
die gleiche Funktion übernimmt 
wie der Slot der XL-Modelle: er 
dient zur Aufnahme von EPROM- 
Software und besitzt insgesamt 40 
Datenleitungen, die von den er¬ 
setzbaren Cartridges unterschied¬ 
lich genutzt werden. Bastler kön¬ 
nen diese Schnittstelle auch expe¬ 
rimentell einsetzen, da zum 
Beispiel die Pins 1 und 2 je 5 Volt 
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Stromspannung liefern, die sich 
zur Versorgung externer Schalt¬ 
kreise (Steuerungselektronik) her¬ 
anziehen lassen. Besondere Wich¬ 
tigkeit erhalten die beiden neun- 


poligen Buchsen an der rechten 
Geräteseite; die erste stellt die Ver¬ 
bindung zum wichtigsten Steuerin¬ 
strument (der Maus) her, an der 
zweiten läßt sich ein normaler Joy¬ 


stick anschließen. Ein Joystick-An¬ 
schluß ist überdies auch mit 
Buchse 1 möglich. Beim 1040 STF 
befinden sich diese Schnittstellen 
an der Geräteunterseite. 


IBM PC und Kompatible: Schnittstellen für Umsteiger 


Durch rasant fallende Preise und 
wachsendes Qualitätsniveau ist 
auch für private und halbprofessio¬ 
nelle Anwender der Kauf eines re¬ 
gulären (das heißt IBM-kompati- 
blen) Personal Computers durch¬ 
aus ein diskussionswürdiges 
Thema. Es gibt heute Angebote, 
die ebenso günstig sind wie etwa 
eine komplette Anlage des Com- 
modore 128 mit Drucker, Monitor 
und Laufwerk. 

Der Vorteil, den ein IBM oder ein 
Kompatibler bietet, liegt vor allem 
in den einheitlichen Anschlußmög¬ 
lichkeiten für Peripherie sowie in 
dem enormen Angebot an aus¬ 
tauschbarer, lauffähiger Software. 

Im allgemeinen muß sich ein 
PC-Besitzer keinerlei Gedanken 
um die Schnittstellen, deren Konfi¬ 
guration und Betriebsleistungen 
kümmern, weil dies normalerweise 
durch die eingesetzte Profi-Soft¬ 
ware übernommen wird. Aus die¬ 
sem Grund gehen die Handbücher 
der Geräte auch kaum auf die An¬ 
schlüsse der Geräte ein. Dank des 
ausgereiften MS-DOS-Betriebssy- 
stems können viele Schnittstellen- 


Zugriffe im Direktmodus auch ohne 
jede Programmierkenntnisse 
durchgeführt werden; so ist es zum 
Beispiel möglich, sämtliche Bild¬ 
schirmausgaben durch den MS- 
DOS-Systemaufruf PRN zum Druk- 
ker umzuleiten. Ähnlich einfach — 
nämlich durch Drücken von CON¬ 
TROL und PrtSC — erhält man ei¬ 
nen bildschirmidentischen Text¬ 
ausdruck (Hardcopy). 

Interessant werden die Schnitt¬ 
stellen eines PC für Leute, die von 


Home-Computer- auf die PC- 
Ebene umsteigen wollen. In diesen 
Fällen sollte man sich ein Gerät 
aussuchen, das den Betrieb von 
möglichst vielen, bereits vorhan¬ 
denen Peripheriegeräten ermög¬ 
licht. Denn ein Umsteiger will 
schließlich nicht unbedingt seinen 
Monitor oder Drucker zum Fenster 
rauswerfen, nur weil der Kompati¬ 
ble einen anderen Zeichenvorrat 
ausdruckt oder einen speziellen 
Bildschirmanschluß bietet. 

Der Toshiba T1100 zum Beispiel 
verfügt über eine RGB-Monitor- 
Schnittstelle, die identisch ist mit 
der des Commodore 128. Ein Um¬ 
steiger könnte in diesem Fall also 
den vorhandenen 80-Zeichen- 
Bildschirm anschließen. Wer zufäl¬ 
lig einen anderen Home-Computer 
besitzt und dieses Gerät über ei¬ 
nen einfachen Composite-Stecker 
mit einem Monitor betreibt, kann 
unter Umständen auch dieses 
Sichtgerät an einen PC anschlie¬ 
ßen; eine Reihe der tragbaren 
Kompatiblen beziehungsweise 
Hand-held-PC verfügen über eine 
entsprechende Buchse. 

Anschauungs¬ 
sache: Ein IBIn¬ 
kompatibler 
Hand-held-Com- 
puter von hinten 
und von links 


Für den Geldbeutel ist neben 
diesen Hardware- beziehungs¬ 
weise Peripherie-Voraussetzungen 
auch systemtreibende Software 
von Nutzen. So gibt es ein Utility 
(Dienstprogramm) namens Print¬ 
klick, das vor dem Beginn der Ar¬ 
beit mit einer Anwender-Software 
geladen wird und im Hintergrund 
resistent bleibt (das heißt, es wird 
auf Tastendruck aufgerufen oder 
abgeschaltet, ohne daß das 
Hauptprogramm gelöscht wird). 


Mit Printklick ist es unter anderem 
möglich, einen einfachen - in der 
Home-Computer-Szene häufig 
eingesetzten — Epson FX-80- 



Zeitersparnis: Ein Drucker-Spooler 
für IBM mit großer Speicherleistung 


Drucker IBM-kompatibel zu ma¬ 
chen. Das bedeutet, der FX-80 ver¬ 
fügt dann über den vollen IBM- 
Grafikzeichenvorrat, ohne seine ty¬ 
pischen Eigenschaften zu verlie¬ 
re. Möglich wird dies durch die 
Software-gesteuerte Programmie¬ 
rung von Download-Characters 
(benutzerspezifischer Zeichen¬ 
satz). Somit können auch alle übri¬ 
gen Drucker, die über einen Ep- 
son-identischen Befehlssatz verfü¬ 
gen, durch Printklick IBM-kompati¬ 
bel gemacht werden. Erforderlich 
ist lediglich ein marktüblicher Cen- 
tronics-Anschluß. 

Wer durch die neu gewonnenen 
Dimensionen eines PC-Einsatzes 
in einen Geschwindigkeitsrausch 
gerät, wird sich häufig über die 
langsame Ausdruckleistung eines 
kleinen Druckers ärgern; bekannt¬ 
lich ist während der Ausdruck¬ 
phase der Rechner blockiert. Bei 
längeren Dokumenten — zum Bei¬ 
spiel einem Manuskript — sitzt 
man 30 Minuten oder länger vor 
dem Computer. Durch die Zwi¬ 
schenschaltung eines Druckpuf¬ 
fers (auch Spooler oder Pufferspei¬ 
cher) kann der Datentransfer an 
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der computereigenen Schnittstelle 
entlastet werden, weil alle auszu¬ 
druckenden Zeichen in einem Puf¬ 
fer zwischengelagert und Stück für 
Stück vom Drucker abgerufen wer¬ 
den. Während der Ausdruck noch 
läuft, ist der Computer wieder 
betriebsbereit. 

Die ultimative Lösung für 
Schnittsteilen-Probleme bieten 
Geräte, die serielle und parallele 
Datenübertragung interaktiv „un¬ 
ter einem Dach“ verwalten können. 
Meist sind diese intelligenten In¬ 
terfaces mit einem Pufferspeicher 
kombiniert (zum Beispiel der Gerb- 
Spooler DP 100), so daß neben der 
Möglichkeit, Daten aus serieller 


eher für auszudruckende oder 
übertragbare Daten zur Verfügung 
steht. Allerdings sind diese Geräte 
nicht ganz billig. 

Anstelle der externen Schnitt- 
stellen-Peripherie erlauben die 
IBM- und kompatiblen PC auch 
den Einbau von Erweiterungskar¬ 
ten, die einerseits den Arbeitsspei¬ 
cher des Computers vergrößern 
und andererseits verschiedene Zu¬ 
satz-Schnittstellen bieten; hierzu 
zählen ein zweiter Druckeran¬ 
schluß, ein Modem-Anschluß 
(RS232C-Schnittstelle) oder ein 
Maus-Anschluß, der sich auch für 
Joysticks eignet. 

Alfred Görgens 


Schnittstelle in eine parallele 
Schnittstelle umzuleiten (und um¬ 
gekehrt) auch ein externer Spei- 



Komplettlösung: Eine RAM-Erwei- 
terungskarte mit Druckeranschluß 


Sinclair Spectrum: Zusatz-Interfaces gefragt 


Interessant wird die Arbeit mit 
dem Sinclair Spectrum erst, wenn 
man die entsprechenden Erweite¬ 
rungs-Schnittstellen besitzt. Allem 
voran das Interface I von Vobis, mit 
dem der Anschluß der Microdrives 
möglich wird. Für rund 200 Mark 
bietet es zudem die Möglichkeit, 
mehrere Rechner zu verbinden. 
Das V.24-Interface von Müller in 
Flensburg enthält neben der er¬ 
wähnten seriellen Schnittstelle ein 
erwähnenswertes Terminalpro¬ 
gramm. 

Für rund 1100 Mark gibt es bei 
verschiedenen Herstellern das 
Diskettenlaufwerk Discovery von 
Opus. Das Interface I und die Dis¬ 
covery haben eines gemeinsam: 
Sie vermeiden den „Schnittstel¬ 
lensalat“, sind leicht anzusteuern 
und liefern außerdem einen 
schnellen Massenspeicher mit. 

Die Discovery-Schnittstelle kann 
(bisher) jedoch außer für die Druk- 
keransteuerung nurfür DFÜ einge¬ 
setzt werden, wenn man das ent¬ 
sprechende Programm kauft. Für 
andere Zwecke ist sie derzeit nicht 
einzusetzen. Der hohe Preis - da¬ 
für bekommt man drei Computer — 
ist allerdings etwas abschreckend. 
Das Kempston-Joystick-Interface 
als „Zugabe“ kann als weiterer 
Pluspunkt gewertet werden. Das 
Microdrive und die Floppy weisen 
in der Ansteuerung kaum Unter¬ 
schiede auf, weshalb es auch nur 
wenige Programm-Übertragungs¬ 
probleme gibt. 

Das Wafadrive machte zunächst 
dem Interface I Konkurrenz, weil es 
zwei Laufwerke bietet. Gegen die¬ 
ses Gerät sprechen inzwischen die 


Erfahrungen. Die Ansteuerung ist 
schwierig, die Probleme der Soft¬ 
ware-Kompatibilität noch lange 
nicht alle gelöst. Der englischen 
Dokumentation sind kaum Hilfen 
zu entnehmen. Dieses Gerät wird 
von Programmherstellern kaum 
unterstützt, weil es nicht sehr ver¬ 
breitet ist. Vermutlich gibt es auch 
deshalb noch keine Hardcopy¬ 
oder DFÜ-Software, die hiermit 
läuft. Nicht einmal der Druckeran¬ 
schluß ist problemlos durchzufüh¬ 
ren. Privatlösungen sind allerdings 
möglicherweise über diverse Sin- 
clair-Clubs erhältlich. 

Die Centronics-Schnittstellen 
von Dorsch und Microcomputerla- 
den machen bei der Druckersteue¬ 
rung kaum Kopfzerbrechen. Beim 
Dorsch-Interface ist das Kabel fest 



Vielseitig: Die Schnittstellenauswahl 
beim Sinclair Spectrum in Verbindung 
mit dem Interface I 


angeschlossen und braucht nur 
noch beim Drucker eingesteckt zu 
werden. Allerdings läßt sich die 
Code-Umwandlung der Zeichen 
über ASCII 127 nicht abschalten. 

Von den Joystick-Interfaces sind 
eigentlich nur die beiden genann¬ 
ten interessant. In beiden Fällen ist 
die Benutzung und auch der An¬ 
schluß ganz einfach durchzufüh¬ 
ren. Das Kempston-Interface ver¬ 
trägt sich allerdings wegen ver¬ 
schiedener Abfragen nicht mit 
anderen als dem Original-ROM 
des Spectrum. Das Interface II hat 
den Vorteil, daß es Tastatur-Einga¬ 
ben simuliert (also diese Software 
auch ohne Interface II funktioniert). 
Der Programm-ROM-Steckplatz 
dürfte in Anbetracht der Ladezeiten 
bei Microdrives nicht so interes¬ 
sant sein; er wird auch wenig 
unterstützt. 

Empfehlenswert zur Vermeidung 
größerer Probleme sind folgende 
Kombinationen: 

— Interface I, Microdrive, Inter¬ 
face II, serielles Interface am 
Drucker oder 

— Discovery, Centronics-Interface 
am Drucker, evtl. V.24-Interface 
von R. Müller. 

In beiden Fällen sind alle not¬ 
wendigen Elemente vorhanden; 
die Kombinationen vertragen sich 
mit fast aller Software (werden 
auch unterstützt). Sie sind gut bis 
besser dokumentiert (Schnittstel- 
len-Belegung, Programmierhin¬ 
weise, Programmanpassung) und 
gewährleisten eine zufriedenstel¬ 
lende Datensicherheit. 

Erika Hölscher 
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HC-AKTION 


Wenn Sie ein Programm entwik- 
keln, das die C64-BASIC-Zeilen 
auf den kleinen Bruder zum Lau¬ 
fen bringt, nehmen Sie an der 
Verlosung eines nagelneuen 
Commodore 64 teil 



Großer HC-Wettbewerb 
für den WüMtischrechner 


Als Nachfolger für den ,.Volks¬ 
computer VC-20“ war er entwickelt 
worden, der C16 und sein kleiner 
Radiergummibruder C116. Doch 
statt zu einem Verkaufsschlager zu 
werden wie sein Vorgänger, diente 
er in den ausgedehnten Frankfurter 
Lagerhallen von Commodore als 
Staubfänger: Die einen potentiel¬ 
len Käufer warteten lieber auf den 
Amiga, die anderen stiegen um auf 
Konkurrenzrechner, die zu fast 
dem gleichen Preis das vier- bis 
achtfache an Speicherplatz boten. 
Als dann bei Comodore das Geld 
knapp wurde, besann man sich in 
der Vorstandsetage und verschleu¬ 
derte Zehntausende von C16 an 
Aldi und andere Kaufhausketten. 
Und deshalb freut sich Oma Pie¬ 
penbrink bei ihrem allsamstägli¬ 
chen Einkauf, daß diese Compu¬ 
ter, von denen ihre Enkelin immer 
schwärmt, schon für unter hundert 
Mark zu haben sind. Und kauft ei¬ 
nen für den nächsten Geburtstag. 

Doch spätestens am zweiten Tag 
fragt sich die so Beschenkte: „Was 
soll ich mit dem Ding?“ Während 
die Klassenkameraden, die zu 
Weihnachten einen C64 geschenkt 
bekamen, Space-Invaders bis zum 
Umfallen spielen können, scheitert 
das beim C16 daran, daß es kaum 
solcherlei Software dafür gibt. Ver¬ 
gleichsweise vernünftigere Anwen¬ 
dungen, Datenfernübertragung 
oder die Steuerung der Modell¬ 
eisenbahn via Computer scheitern 
daran, daß der C16 an der Stelle, 
wo VC20 und C64 ihren Userport 
haben, ein Loch hat — für den 
Kassettenrecorder. 

Bleibt also nur, selber zu pro¬ 
grammieren oder nach Studium 
des Handbuchs festzustellen, daß 


nicht nur das BASIC des C16 kom¬ 
patibel zu dem des C64 ist, son¬ 
dern auch das Diskettenlaufwerk 
VC1541. Dem Grundsatz des Hau¬ 
ses Commodore — ein neuer Com¬ 
puter hat zu allen anderen inkom¬ 
patibel zu sein — trägt aber 
wenigstens die Adressbelegung 
Rechnung. 64er Maschinenpro¬ 
gramme laufen sowieso nicht und 
trifft der kleine schwarze Computer 
in BASIC-Programmen seines gro¬ 
ßen Bruders auf PEEKs und PO- 
KEs, dann tut er bestenfalls irgend 
etwas Unerwartetes, zumeist aber 
etwas Erwartetes: Er stürzt ab. Um 
Programme lauffähig zu kriegen, 
helfen also nur etliche Nacht¬ 
schichten, um C64-Zeilen in die 
entsprechenden C16-Zeilen zu ver¬ 
wandeln. Da Computerbesitzer be¬ 
kanntlicherweise sehr faul sind, 
bietet sich für diese stupide Arbeit 
die Überlegung an, diese mühe¬ 
volle Konvertierungsarbeit den 
Computer machen zu lassen. 

Faulheit muß man unterstützen. 
Und darum stiften wir demjenigen 
Leser, der das beste Konvertie¬ 
rungsprogramm von C64 auf C16 
schreibt, einen nagelneuen C64. 

Das geforderte Programm muß 
folgendes leisten: Es muß BASIC- 
Programme, die für den C64 ge¬ 
schrieben worden sind, selbstän¬ 
dig einiesen, PEEK- und POKE- 
Befehle erkennen und anhand der 
abgedruckten Tabelle ersetzen. 
Wird in dem C64-Programm auf 
den Sound- oder Grafikchip zuge¬ 
griffen (beim C64 sind das die 
Adressen ab 53248), dann soll es 
sich die Zeilennummern merken 
und am Schluß der Konvertierung 
den Besitzer auf diese Zeilennum¬ 
mern hinweisen. 


Diese Befehle müssen dann von 
Hand mittels des wesentlich mäch¬ 
tigeren BASICS des C16 (BASIC 
3,5 statt BASIC 2,0), das die Be¬ 
fehle BOX, DRAW, CIRCLE, 
SOUND oder VOL kennt, ersetzt 
werden. (Oder bei Sprites, die der 
C16 nicht kennt, rausgeworfen 
werden.) 

Da bei Kassettenspeicherung 
beide Geräte zwar das gleiche Auf¬ 
zeichnungsformat, aber unter¬ 
schiedliche Taktfrequenzen benut¬ 
zen, ist es nur möglich, vom C64 
auf Diskette geschriebene Pro¬ 
gramme mit dem C16 zu lesen und 
zu konvertieren. 

Es gibt verschiedene Lösungs¬ 
ansätze: 

1. Eine Möglichkeit wäre es, das 
Programm noch direkt auf der Dis¬ 
kette umzuwandeln. Dazu benötigt 
man einen speziellen Diskmonitor, 
der die Tracks und Sektoren der 
Diskette, auf der sich das zu kon¬ 
vertierende File befindet, nach den 
Tokens (Kürzeln) der Befehle PEEK 
und POKE durchsucht, die dazu¬ 
gehörigen Adressen herausfindet 
und ersetzt. Der eingebaute Ma¬ 
schinensprache-Monitor TEDMON 
des C16 könnte dazu behilflich 
sein. 

2. Wem das zu kompliziert er¬ 
scheint, der kann sich auch die 
Möglichkeit des C64 und des C16 
zunutze machen, Programmli- 
stings in sequentielle Dateien um¬ 
zuwandeln: 

OPEN 8,8,8,“SEQUENZ,S,W“ 

:CMD8: LIST:PRINT#8:CLOSE8 

schreibt das geladene Programm 
in einen sequentiellen File namens 
„Sequenz“. Das in HC 6/86 wan¬ 
delt diese sequentiellen Files wie¬ 
der in ein Programm zurück, indem 
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es zeilenweise das Listing auf den 
Bildschirm druckt, das Programm 
anhält und über den Tastaturpuffer 
genau auf der Zeile ein <RETURN> 
auslöst, womit die Zeile in den Pro¬ 
grammspeicher übernommen wor¬ 
den ist. Auf gleiche Weise löscht 
sich das Konvertierungsprogramm 
.anschließend aus dem Speicher, 
'(Zeilennummern drucken, in de¬ 


nen das Programm steht, Cursor 
drauf und <RETURN>) so daß nur 
noch das zu konvertierende Pro¬ 
gramm im Speicher ist, das mit 
SAVE abgespeichert werden kann. 
Zwischen dem Einladen des se¬ 
quentiellen Files und der Über¬ 
nahme der Zeile mit <RETURN> 
müßte bei einem Umwandlungs¬ 
programm C64-in-C16 ein Algo¬ 


rithmus stehen, der PEEKs und 
POKEs erkennt und den Pro¬ 
grammzeilenstring entsprechend 
der Tabelle umändert. 

Auch wenn dieses Programm 
vorwiegend C16-Benutzern zugute 
kommt, sind auch alle Leser, die 
einen C64 haben, aufgefordert, 
ihre Programmierkenntnisse unter 
Beweis zu stellen. Joachim Graf 


Umwandlung der POKE-Adressen von C64 auf CI 6 


Adresse 

Adresse 

Funktion 



Adresse 

Adresse 

Funktion 



C64 

CI 6/116 




C64 

C16/116 




3-4 

754-755 

Vektor: Umwandlung Fließkomma/Ganze Zahl 



195-196 

180-181 

Zeiger auf Kernal-Vektoren 



5-6 

756-757 

Vektor: Umwandlung Ganze Zahl/Fließkomma 



197 

2038 

Vorher gedrückte Taste 



7 

7 

Suchzeichen/Trennzeichen 



198 

239 

Anzahl der Zeichen im Tastaturpuffer 



8 

8 

Suchzeichen/Trennzeichen, Flag für Anführungszeichen 



199 

194 

RVS-Flag (1 = RVS 0= Normal) 





am Ende eines Strings 



200 

195 

Ende der logischen Zeile für Eingabe 



9 

9 

Cursorspalte ab letztem TAB 



203 

198 

Letzte gedrückte Taste 



10 

10 

Flag: LOAD (=0) und VERIFY ( = 1) bei BASIC 



208 

199 

Flag: INPUT oder GET über Tastatur 



11 

11 

Eingabepufferzeiger, Anzahl der Elemente (DIM) 



209-210 

200-201 

Anfangsadresse der aktuellen Bildschirmzeile 



12 

12 

Flag: Standardwert von DIM 



211 

202 

Derzeitige Cursor-Spalte 



13 

13 

Flag: Datentyp: 255 = String 0= Numerisch 



212 

203 

Flag: Anführungszeichenmodus (1 = ja. 0 = nein) 



14 

14 

Flag: Art der numerischen Variablen 



213 

204 

Physische Bildschirmzeilenlänge 





(128 = Ganze Zahl, 0= Fließkomma) 



214 

205 

Derzeitige Cursor-Zeile 



15 

15 

Flag: DATA, LIST u. ,,Garbage Collection" 



215 

206 

Temporärer Datenbereich 



16 

16 

Flag: Benutzerfunktionsaufruf 



216 

207 

Flag: Einfügemodus (lnhalt = Anzah! der Einfügungen) 



17 

17 

Flag: 0 = INPUT, 64 = GET, 152=READ 



243-244 

234-235 

Zeiger: Derzeitiger Farb-RAM des Bildschirmes 



18 

18 

Flag: Vorzeichen bei trigonometrischen Funktionen, für 



245-246 

236-237 

Vektor: Tastatur-Dekodiertabelle 





Gleichheit bei Vergleichsoperationen 



256-511 

291-511 

Stapelspeicher des Prozessors 



19 

19 

Flag: Aktuelle L/0-Kanal (CDM) Nummer, 



512-600 

512-600 

BASIC-Eingabepuffer 





Input-Prompt ( = Fragezeichen) 



601-610 

1289-1296 

Tabelle der aktiven logischen Dateinummern 



20-21 

20-21 

Ganzzahlige Werte (Adressen), Zeilennummern 



611-620 

1299-1306 

Tabelle der Gerätenummern für jede aktive Datei 



22 

22 

Zeiger auf temporären Stringstapel 



621-630 

1306-1318 

Tabelle der Sekundäradressen jeder aktiven Datei 



23-24 

23-24 

Zeiger auf letzte Stringadresse 



631-640 

1319-1328 

Tastaturpuffer 



25-33 

25-33 

Stapel f. temporäre Strings (Stringstack) 



641-642 

1329-1330 

Startadresse des RAM für Betriebssystem 



34-35 

34-35 

Suchzeiger, Übertragungszeiger, Variablenzeiger, 



643-644 

1331-1332 

Zeiger: RAM-Ende für Betriebssystem 





Sprungvektor, Lesen von Zeilennummern, Zeiger für 



645 

1333 

Flag: Zeitüberschreitung auf lEEE-Bus 





Speicherverschiebungen. 



646 

1339 

Derzeitige Zeichenfarbe 



36-37 

36-37 

Zeiger für indirekte Speicherung 



648 

1342 

Anfang des Bildschirmspeichers (Page) 



38-41 

38-41 

Fließkommaergebnis der Multiplikation (Mantisse) 



649 

1343 

Größe des Tastaturpuffers 



43-44 

43-44 

Zeiger: Anfang BASIC-Test 



650 

1344 

Flag: Tastenwiederholung 



45-46 

45-46 

Zeiger: Anfang der nichtindizierten Variablen 



651 

1345 

Zählgeschwindigkeit für Wiederholen 





VARTAB-1 = Ende BASIC-Text) 



652 

1346 

Wiederholungsverzögerung 



47-48 

47-48 

Zeiger: Anfang der Feld-Variablen 



653 

1347 

Abfrage, ob gedrückt: SHIFT, CTRL und Commodore 



49-50 

49-50 

Zeiger: Ende Feldvariablen +1 



654 

1348 

Kopie von 653 zur Abfrage, ob diese Tasten schon bei 



51-52 

51-52 

Zeiger: Anfang der Stringspeicherung 





vorheriger Abfrage gedrückt waren 



53-54 

53-54 

Zeiger: Stringübertragungen 



655-656 

1349-1350 

Vektor: Tastaturabfrage 



55-56 

55-56 

Zeiger: Ende BASIC-Speicher +1 



657 

1351 

Flag für Blockierung der Umschaltung Text/Grafik mit 



57-58 

57-58 

Zeiger: Derzeitige BASIC-Zeilennummer 





CHR$8/9 128-SHIFT unwirksame 0 = wirksam 



59-60 

601-602 

Zeiger: Vorherige Zeilennummer (für CONT) 



658 

1352 

Flag: Automatisches Scrollen abwärts. 0 = Ein =*= 0 = Aus 



61-62 

603-604 

CHRGET-Zeiger für CONT 



768-769 

768-769 

Vektor: BASIC-Fehlermeldung anzeigen 



63-64 

64-64 

Zeiger: Derzeitige DATA-Zeilennummer 



770-771 

770-771 

Vektor: BASIC-Warmstart 



65-66 

65-66 

Zeiger: Aktuelle DATA-Adresse 



772-773 

772-773 

Vektor: BASIC-Text in Token umwandeln 



67-68 

67-68 

Vektor: INPUT-Routine 



774-775 

774-775 

Vektor: Token in BASIC-Text umwandeln (Chart-List) 



69-70 

69-70 

Derzeitiger BASIC-Variablenname 



776-777 

776-777 

Vektor: BASIC-Befehl ausführen (Character Dispatch) 



71-72 

71-72 

Zeiger: Aktuelle Variable 





IEVAL 



73-74 

74-74 

Variablenzeiger für FOR/NEXT 



778-779 

778-779 

Vektor: Token-Auswertung (FRMEVEL) 



75-96 

75-96 

Zwischenspeicher für BASIC-Zeiger/Daten 



780 

2034 

Übergabewert .A-Register 



97 

97 

FAC-Exponent 



781 

2035 

Übergabewert .X-Register 



98-101 

98-101 

FAC-Mantisse 



782 

2036 

Übergabewert .Y-Register 



102 

102 

FAC-Vorzeichen 



783 

2037 

Übergabewert Statusregister 



103 

103 

Polynomauswertung 



785 

1280 

URS-Sprung 



104 

104 

FAC-Überlauf 



785-786 

1281-1282 

USR-Adresse 



105 

105 

ARG-Exponent 



788-789 

788-789 

IRQ RAM-Vektor 



106-109 

106-109 

ARG-Mantisse 



790-791 

790-791 

BRK-Vektor 



110 

110 

ARG-Vorzeichen 



794-795 

792-793 

Kernal OPEN-Vektor 



111 

111 

Ergebnis des Vorzeichenvergleiches FAC/ARG 



798-797 

794-795 

Kernal CLOSE-Vektor 



112 

112 

FAC-Niederwertigste Stelle (Rundung) 



796-799 

796-797 

Zeigt auf: Kernal CHKIN-Vektor 



113-114 

113-114 

Zeiger: Kassettenpuffer 



800-801 

798-799 

Kernal CHKOUT-Vektor 



115-138 

1139-144 

CHRGET-Routine 



802-803 

800-801 

Kernal CLRCHN-Vektor 



121 

1145-1156 

CHRGOT-Routine 



804-805 

802-803 

Kernal CHRIN-Vektor 



122-123 

59-60 

Zeiger: Derzeitiges Byte des BASIC-Textes 



805-807 

804-805 

Kernal CHROUT-Vektor 



136-143 

1283-1287 

Eingangswert der RND-Funktion 



808-809 

806-807 

Kernal STOP-Vektor 



144 

144 

I/O-Statuswert :ST 



810-811 

806-809 

Kernal GETIN-Vektor 



145 

145 

Flag: STOP-Taste/RVS-Taste 



812-813 

810-811 

Kernal CLALL-Routine 



147 

147 

Flag: 0 = LOAD, 1 = VERIFY (Beim C16 ist das Label mit 



814-815 

821-813 

Vektor: Benutzer-IRQ 





VERFCK benannt.) 



816-817 

814-815 

Zeigt auf: Kernal LOAD-Vektor 



148 

148 

Flag: ,.Zeichen gepuffert" im seriellen Bus 



818-819 

816-817 

Kernal SAVE-Vektor 



149 

149 

Zeichen im Puffer für seriellen Bus 



828-1019 

819-1010 

Kassettenpuffer 



152 

151 

Anzahl der offenen Dateien, Dateitabellen-Index 



1024-2047 

3072-4096 

Video-RAM (Beim C16 ist das Label TEDSCN benannt) 



153 

152 

Standard-Eingabegerät (0 = Tastatur) 



2048- 

4096- 

Beginn des BASIC-Speichers 



154 

153 

Standard-Ausgabegerät (CMD) (3 = Bildschirm) 



53265 

65286 

Grafikmodus 



157 

154 

Flag: 128 = Direktmodus 0= Programm 



53270 

65287 

Smooth Scolling 



160-162 

163-165 

Echtzeituhr (jiffy clock) ca. 1/60 sek 



53273 

65289 

Interruptregister 



183 

171 

Länge des aktuellen Dateinamens 



53274 

65289 

Maskenregister 



184 

172 

Logische Dateinummer 



53280 

65305 

Rahmenfarbe 



185 

173 

Aktuelle Sekundäradresse 



53281 

65301 

Hintergrundfarbe 0 



186 

174 

Aktuelle Gerätenummer 



53282 

65302 

Hintergrundfarbe 1 



187-188 

176-178 

Zeiger: Aktueller Dateiname 



53283 

65303 

Hintergrundfarbe 2 



193-194 

178-179 

I/O-Startadresse 



53284 

65304 

Hintergrundfarbe 3 
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HARDWARE 


Computer aus 
zweiter Hand 

Die rapiden Preissenkungen vergangener 
Jahre haben ihre Auswirkung auch auf das 
Gebraucht-Computergeschäft. Nur mit ent¬ 
sprechendem Zubehör sind Käufer zu finden 


D as Problem tauchte schon vor 
fünf Jahren auf: Da machte 
der TI-99/4A durch seinen 
Preissturz Geschichte. Von an¬ 
fangs knapp 3000 Mark rutschte 
der Preis über 1500 Mark innerhalb 
kürzester Zeit auf unter 1000 Mark. 
Am Ende war der Rechner im Aus¬ 
verkauf gar für 150 Mark zu haben. 
Keine Chance also für einen, der 
frühzeitig den Rechner gekauft hat 
und ihn dann aber wieder losha¬ 
ben will. Ähnlichen Frust erlebten 
auch die ersten C64-Käufer, die vor 
drei Jahren immerhin satte 1500 
Mark für das Gerät hinblättern 
mußten. Sie waren gezwungen, 
nachdem der Preis um über die 
Hälfte gefallen war, einen erhebli¬ 
chen Verlust einzustecken. 

Die Liste läßt sich beliebig fort¬ 
setzen. Und damit wird ein Trend 
auf dem Gebraucht-Computer- 
markt deutlich: Nur noch preissta¬ 
bile Rechner bringen die Garantie, 
daß ein großer Teil der Investitio¬ 
nen wieder herausspringt. So etwa 
der IBM PC, der über die Jahre sei¬ 
nen Preis nahezu konstant hielt. 
Einzige Chance, die sich dem Ver¬ 
käufer anderer Computer bietet: Er 
muß durch die Beigabe von Soft¬ 
ware und Peripherie seinen Rech¬ 
ner für den Käufer so attraktiv wie 
möglich machen. 

Denn Kaufinteressenten gibt es 
genug. Doch die haben das Glück, 
sich in einem übersättigten Markt 
in Ruhe umsehen zu können, um 
nach dem günstigsten Angebot 
Ausschau zu halten. Und bei dem 
Überangebot von Secondhand- 
Rechnern bietet sich für den Käufer 
auch noch die Chance, durch Han¬ 
deln den Preis zu drücken. So 
müssen viele Anbieter mit ge¬ 
schmälertem Erlös als eingeplant 
vorliebnehmen. 

In unserer Gebraucht-Compu- 
terliste führen wir die gängigsten 
Modelle. Die teilweise erheblichen 
Preisschwankungen stammen von 
der unterschiedlichen Ausstattung 
der Computer beziehungsweise 
der Beigabe von Zubehör. Neben 
dem aktuellen Stand haben wir die 
Gebrauchtpreise der letzten Jahre 
aufgeführt. 

Trotz des eindeutig für den Käu¬ 
fer tendierenden Gebraucht-Com- 
putermarktes sollten Sie sich nicht 
entmutigen lassen, ein nicht mehr 
benötigtes Gerät anzubieten, wenn 
Sie das Gefühl haben, daß ein an¬ 
derer noch etwas damit anfangen 
kann. -wt 


Wichtige Hinweise 
für Verkäufer 

• Am gefragtesten sind zurZeit 
IBM-kompatible Personal-Com¬ 
puter sowie tragbare Rechner 
für dem Heimgebrauch. 

• ,,Exoten“ lassen sich mo¬ 
mentan schlecht verkaufen. 

• Von ,.Privat zu Privat“ findet 
man am besten über den Klein¬ 
anzeigenteil von Computerzeit¬ 
schriften einen Käufer. 

• In verschiedenen Städten 
gibt es professionelle Ge- 
braucht-Com putergeschäfte. 
Dort kann man auch Informatio¬ 
nen über den Gebrauchtwert 
einholen. 

• In vielen Großstädten finden 
bereits Computer-Flohmärkte 
statt. Hier bietet sich eine ideale 
Möglichkeit, Käufer zu finden. 

• Viele Verkäufer gehen dazu 
über, Gebrauchtgeräte über 
Mailboxen anzubieten. 

• Passen Sie Ihren Gebraucht¬ 
preis dem aktuellen Marktpreis 
an. 

• Als Richtlinie für einen etwa 
zwei Jahre alten Rechner gilt 
etwa 60 Prozent vom Neuwert. 

• Wenn Sie über Software oder 
interessante Peripherie verfü¬ 
gen, sollten Sie sich überlegen, 
ob Sie den Rechner zusammen 
mit dem Zubehör als Komplett¬ 
angebot anbieten. 


Die wichtigsten Tips 
für Käufer 

• Komplettangebote sind bes¬ 
ser als die Komponenten einzeln 
zu kaufen, weil in der Regel Geld 
gespart wird und die Geräte auf¬ 
einander angepaßt sind. 

• Bei Preisvergleichen unbe¬ 
dingt auf das mitangebotene 
Zubehör (Software, Peripherie) 
achten. 

• Vorsicht ist geboten, wenn 
an dem Computer herumgeba¬ 
stelt worden ist. Lassen Sie sich 
am besten bestätigen, daß sich 
der Computer im Originalzu¬ 
stand befindet. 

• Aus der Kaufquittung kann 
man das Alter des Rechners 
herauslesen. 

• Vor dem Kauf unbedingt prü¬ 
fen : Bewegliche Teile wie Tasta¬ 
tur, Laufwerk, Recorder, Drucker 
etc. Beim Bildschirm dürfen die 
Zeilen auch bei längerem Be¬ 
trieb nicht zu zittern beginnen. 

• Machen Sie sich die Mühe, 
vorher den Markt und die Preise 
zu studieren. 

• Es gibt genügend Verkäufer, 
die sich zum Handeln über den 
Preis einlassen. 

• Überprüfen Sie, ob die ange¬ 
botene Peripherie auch zum 
Rechner paßt. 

• Achten Sie darauf, daß keine 
Kabel oder Handbücher fehlen. 

• Wichtig ist die Anzahl und 
Funktion der Schnittstellen. 

• Es gibt professionelle Händ¬ 
ler, die auch eine Garantie für 
gebrauchte Geräte überneh¬ 
men. 
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Hersteller 

Modell 

Neupreis in 
diesem Jahr 
ca. in Mark 

Gebrauchtpreislage in Mark 

Ausstattung und 
Zubehör 

1986 

1985 

1984 

Apple 

Apple 11 + 


750 bis 3300 

1500 bis 3200 

3000 bis 4450 

48 oder 64 KByte 

RAM, Monitor, Lauf¬ 
werke, Drucker, Soft¬ 
ware 

Apple Ile 

2800 

1995 bis 3100 

3200 bis 4800 

5500 

128 KB, 2 Laufwerke, 
Monitor, diverse Lite¬ 
ratur und Software 

Apple llc 

2000 

1500 bis 4700 

2300 bis 2500 

— 

128 KB, Monitor, Lauf¬ 
werke, Imagewriter, 
Software 

Atari 

800 XL 

200 

400 bis 800 

400 bis 900 

- 

64 KB, Laufwerk, 
Drucker, Software 

130 XE 

400 

520 bis 1200 

- 

- 

128 KB, Laufwerk, 
Drucker, Software 

520 ST 

2700 

2000 bis 2500 

- 

- 

512 KB 

Colour Genie 

Colour Genie 

400 

400 bis 1300 

350 bis 800 

350 bis 500 

32 KB, Monitor, 

Kassettenrecorder, 

Software 

Commodore 

C64 

500 

600 bis 1200 

500 bis 1400 

600 bis 1900 

Kassettenrecorder, 
Drucker, Disketten, 
diverse Software 

Hewlett 

Packard 

HP-41C 

690 

330 bis 950 

300 

360 bis 2500 

Drucker, diverse 
Peripherie, Software, 
Literatur 

HP-41CV 

530 

600 

470 bis 480 

380 bis 2000 

Diverses Zubehör 

HP-41CX 

840 

400 bis 590 

850 

950 

RAM-Erweiterung 

HP-71B 

1560 

850 bis 1200 

1100 bis 1350 

- 

Diverses Zubehör 

HP-75C 

3400 

1250 bis 1650 

1200 bis 1900 

1690 bis 2750 

Diverses Zubehör 

IBM 

IBM PC 

6270 

4000 bis 6800 

3990 

- 

256 KB, Monitor, 
Tastatur 

Schneider 

CPC 464 

700 

500 bis 790 

750 bis 800 

- 

Monochrom-Monitor 

CPC 464 

1140 

1500 

- 

- 

Farbmonitor, Drucker, 
Software 

Sharp 

PC-1401 

340 

120 

160 

500 

CE 126, CE 152, 
diverse Software 

PC-1500 

520 

1000 bis 400 

450 

1400 bis 400 

CE 150, CE 155, Soft¬ 
ware, Literatur 

Sinclair 

ZX Spectrum 

250 

750 bis 300 

- 

- 

2 Laufwerke, Drucker, 
Cartridges, Software 

QL 

570 

980 

1250 bis 1680 

1890 

128 KB, Monitor, 

2 Microdrives 

Texas 

Instruments 

TI-99/4A 

450 

190 

198 bis 390 

285 bis 3500 

Kassettenrecorder, 
Monitor, V.24-Schnitt- 
stelle, diverse Soft¬ 
ware, Literatur 

Triumph Adler 

Alphatronic 

PC 

1000 

950 bis 2800 

1200 bis 2700 

- 

- 


Das ist Ihr Computer heute wert: Unsere Vergleichstabelle zeigt die Gebrauchtpreislage der gängigsten 
Systeme aus den letzten drei Jahren. 
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DFÜ 

Die digitalen Reisen 
des Hacker S. 

Unser fünfter Teil beschäftigt sich mit dem Hacken 
in internationalen Rechnern 


D as Energieministerium, die 
staatliche Forstbehörde, die 
Nationalbibliothek sowie 
zahlreiche Firmen aus Neuseeland 
bekamen Ende April Besuch aus 
Deutschland: Mad Max, ein 1 /jäh¬ 
riger Schüler aus Frankfurt, hatte 
auf seinem C64 sechzehn Stunden 
lang einen NUA-Scanner laufen 
lassen. 


NUA-Scanner 

Scanner sind simple Pro¬ 
gramme, die in Netzknoten (Da¬ 
tex, Tymnet, usw.) Anwahlnum¬ 
mern von Computern durchpro¬ 
bieren. Ihre logische Struktur 
demonstriert dieses Programm 
in Pseudo-Pascal: 

Loop: Nummer = Nummer 

+ 1 

OUTPUT Nummer TO 
RS232 

IF INPUT RS232 <> 
“Not available“ 

THEN Schreib 
GOTO Loop 

Schreib: PRINT Nummer, 

IN PUT RS 232 
OUTPUT “(CTRL P) 
CLR“TO 
RS 232 
Wait 500 
GOTO Loop 

Nummern werden durchpro¬ 
biert, Rechner, und Knotenmel¬ 
dungen abgefangen, bei inter¬ 
essanten Meldungen wird mit¬ 
protokolliert ■ und dann die 
Verbindung wieder gelöst (Con- 
trol-P CLR ist der entspre¬ 
chende Befehl im Datex-Netz). 
Gehackt wird dann am nächsten 
Morgen anhand der gefundenen 
Nummern von Fland. 


Die neuseeländischen Num¬ 
mern wanderten natürlich schnell 
in Hackerkreisen. Und weil hundert 


Hacker mehr Passwörter auspro¬ 
bieren können als einer allein, wa¬ 
ren die ersten Codes auch bald ge¬ 
knackt. Forstverwaltung und Ener¬ 
gieministerium dementierten bei 
Bekanntwerden natürlich schleu¬ 
nigst, daß Mad Max an irgendwel¬ 
che sicherheitsrelevanten Daten 
herangekommen sei. Doch alle 
Betroffenen änderten sicherheits¬ 
halber schleunigst ihre Passwör¬ 
ter. (Wer selber mal nach Neusee¬ 
land gehen will, dem sei die NUA 
0530197000016 empfohlen. User-ID 
ist ,,MATE“, Passwort „VISITOR“.) 

„Free flow of Information'' 


„Intergalaktische Vereinigungen 
ohne feste Strukturen“ sind die 
bundesdeutschen Hackerclubs 
nach eigenem Selbstverständnis. 
Lautstark mahnen sie einen umfas¬ 
senden Schutz der persönlichen 
Daten an, und betrachten sich 
selbst als „Verbraucherschützer 
auf den Netzen“. Statt einer immer 
weiter um sich greifenden Mono¬ 
polisierung von Netzwerken und 
Informationsbanken fordern sie 
den free flow of Information, den 
freien und ungehinderten Informa¬ 
tionsaustausch: Freie Kommunika¬ 
tion zwischen allen und jedem, Zu¬ 
gang zu allen gesellschaftlich 
wichtigen Daten und Demokrati¬ 
sierung der Netze. Für sich selber 
nehmen die Computerfreaks diese 
Forderungen bereits vorweg: Als 
Hacker S. vor einigen Wochen 
amerikanische Mailboxen be¬ 
suchte, kam er zu einem hochinter¬ 
essanten Chat. 


Chatten 

In manchen Mailboxen und in 
großen Rechnersystemen kön¬ 
nen mehr als nur ein Benutzer 
gleichzeitig eingeloggt sein. 


Das Gespräch untereinander in 
einem Rechner, das Chatten, ist 
für Hacker die beliebteste Art, 
um neue Leute kennenzulernen 
und Informationen auszutau¬ 
schen. Wer’s ausprobieren will: 
NUA 03106000102. Mit „finger“ 
läßt man sich die User ausge¬ 
ben, die gerade online sind, mit 
„whois" kann man abfragen, 
wer sie sind. 


Wie sich bei dem mehrstündigen 
Chatten herausstellte, war „Sara- 
toga“ — so nannte sich der Hacker 
— Wachoffizier auf dem US-ameri¬ 
kanischen Flugzeugträger „Sara- 
toga“, der vor Lybien kreuzte. Da 
die Bombardierung schon ein paar 
Tage vorbei war, langweilte er sich 
schrecklich und benutzte seinen 
mitgebrachten Apple II und den 
militärischen Nachrichtensatelli¬ 
ten, mit dem die US-Navy die Ver¬ 
bindungen zu ihren Schiffen auf¬ 
rechthält, dazu, sich in der Weltge¬ 
schichte herumzutreiben. 

Je mehr Computer es gibt, um so 
mehr Hacker bringt das Land her¬ 
vor. Zwei Drittel aller internationa¬ 
len Datenreisenden sind Amerika¬ 
ner. Je zehn Prozent entfallen auf 
Engländer und Deutsche, der Rest 
der Welt ist nur sporadisch vertre¬ 
ten. So war es reiner Zufall, daß 
unser Hacker S. Anfang des Jahres 
„UJC“, einen Japaner, in einer 
amerikanischen VAX traf, der sich 
enorm freute, einen Deutschen zu 
treffen, denn so erzählte er, er be¬ 
sitze ein deutsches Auto. Es sei — 
und dabei blieb er hartnäckig — 
ein Melcedes. 

Nicht jeder Rechnerbetreiber 
schätzt allerdings Freiheit und De¬ 
mokratie auf den Netzen. Vor eini¬ 
ger Zeit teilte die Cornell-Universi- 
tät aus New York den Rechenzen¬ 
tren der westlichen Welt mit, daß 
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Is ja gut. Kommt ja. Das Kompjutä-Schpiel. Echt versprochen. 
Aber bevor ich mein eigenes Spiel nich selber kann, kriecht Ihr 
das auch nich. Dauert aber nich mehr lange. Die Fahrt im Nebel- 
Nix as Schrott gefahn... Könnt Ihr ja selber sehn. Bald. 

Muß aber nu erstmal wieder 
neuen Jeu Schtick holen. 

Bis bald auf Euerm Bildschirm. 



Oder vorher schon ma den Kuh-Pong aussägen und schicken. 


Kommt dann der Gesamtkatalog. Aber Hallo! 

® Semmel Verlach 

Name 

Straße 

-—fi 

PLZ. „ Ort 

isn 

An: ariolasoft, Carl-Bertelsmann-Str. 161, 4830 Gütersloh. 

Von Experten 


für Experten. 
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ihre Verbindungen gekappt wür¬ 
den, da europäische Hacker das 
System unsicher machen würden. 
Hintergrund der Aktion: Fermilab, 
eine Großforschungseinrichtung 
südwestlich von Chikago, wurde 
von den Kids zum Chatten verwen¬ 
det. Da an Cornell auch Arpanet, 
das amerikanische Militärnetz, 
hängt, haben gut unterrichteten 
Kreisen zufolge die kommunisten¬ 
ängstlichen Amerikaner im Zuge 
ihres SDI-Programms die Hacker¬ 
aktivitäten als Vorwand genom¬ 
men, um die Europäer von ameri¬ 
kanischen Informationen abzuhän¬ 
gen. Wie heißt es so schön in der 
Datenschleuder Nr. 7 vom Chaos- 
Computer-Club: ,,Je sicherer ein 
System gegen unbefugten Zugriff 
geschützt wird, desto unbefugter 
müssen diejenigen sein, die die 
Schwachstellen aufdecken. Am 
Ende kommt dabei ein System her¬ 
aus, auf das überhaupt nur noch 
die Unbefugten Zugriff haben.“ 
Wen es danach drängt, sich mit 
amerikanischen Sicherheitspro¬ 
blemen rumzuschlagen, dem emp¬ 
fiehlt Hacker S. die NUA 
0311050500061. Das ist das Los 
Alamos Integrated Computing Net¬ 
work, von dem aus man sich mit 
„DNA“ zur Defense Nuclear Ageny 
weiterverbinden lassen kann. Eine 
interessante Nacht kann bevorste¬ 
hen. 


Europa 

OVID, das Datenverarbei¬ 
tungssystem des Europäischen 
Parlaments hängt übrigens 
auch am Datex-Netz: Nach der 
NUA 027042920101 gibt man 
eine „5“ und ein (RETURN) ein. 
Danach kann man sich Sit¬ 
zungskalender und -Protokolle 
abrufen sowie nach Stichworten 
oder Abgeordneten fahnden. 
Selbstverständlich ist das Gerät 
neunsprachig, nur die System¬ 
meldungen kommen immer in 
französisch (Interessant zum 
Beispiel die Sitzungsprotokolle 
zum Thema „Gewalt gegen 
Frauen“). 


Wer sich allerdings im Dickicht 
der Netze und Netzknoten durch¬ 
finden will, der braucht schon ein 
bißchen mehr als eine stattliche 
Sammlung von NUA’s. Oft ist es 
gar nicht so gut, sich in einen 
Rechner direkt einzuloggen, ein 


Netzknoten wie Tymnet taugt nicht 
nur zum Spurenverwischen. 

Alle Knoten dieser Erde _ 

Hinter der amerikanischen NUA 
0311020200141 verbirgt sich ein 
solcher Knoten: Telenet betreibt 
hier unter anderem einen Phone- 
Service und ein „International In¬ 
formation System“. Mit der User-ID 
„PHONES“ und Passwort „PHO- 
NES“ sind sämtliche lokalen Tele- 
net-Telefonnummern abrufbar. 
Gibt man als User-ID „INTL“ und 


-0.S.T.01 

Communication etablie 
V0TRE NUMERO D IDENTIFICATION SVP 


VEUILLEZ PATI ENTER SVP 

EXPERIMENTAL INSIS VIDEOTEX SYSTEM 

BITTE WAEHLEN SIE EINE SPRACHE 
PLEASE SELECT A LANGUAGE 
CHOISISSEZ UNE LANGUE S.V.P. 

PER FAV0RE SCEGLIERE UNA LINGUA 

1 DEUTSCH 

2 ENGL I SH 

3 FRANCAIS 

4 I TAL IAN0 


Teletel:Nr -> <ENV0I> 
Prest e1:Nr 

OVID 


Bt x:Nr 

TTY:Nr -> <CR> 


VEUILLEZ PATI ENTER SVP 

AUSKUENFTE ZUR VERBES¬ 
SERUNG DES DIENSTES 

WER SIND SIE ? 

1-Abgeordneter 2-Assistent e.Abg. 

3-Frak t i onsbearnter 4-Beamter d. EP 

5-Kornrni ssi onsbearrit er 9-Sonst i ge 
VON WO RUFEN SIE AN ? 

B-Belgien DK-Daenemark IRL-Irl and 
D-Deutschld GR-Griechen1d L-Luxemburg 
F-Frankr. NL-Nieder1 de E-Spanien 
I-Italien UK-Grossbrit. P-Portugal 
IHRE MUTTERSPRACHE ? 

DA,DE,EL(griechisch),EN,ES,FR,IT,NE,PO 

Ihre Antwort getrennt durch Leerzeichen 
dann: Te1 ete1:ENV01 Btx:# 

Prest e1:# TTY:CR 

0VIDE DEUTSCH 

332331a 

1 F PO 

1 F PO 

VEUILLEZ PATI ENTER SVP 
HAUPTMENU 

1 SITZUNGSKALENDER-TAGESORDNUNGEN 

2 PUBLIKATIONEN-DOKUMENTATION 
! EUROSTAT *20026 

3 MITGLIEDERLISTE STELLENPLAN EP 

4 PRAKTISCHE HINWEISE 

5 MITTEILUNGSDIENST <FUER TTY: 6) 

? VERZEICHNIS DER TEILNEHMER 

8 IHRE KRITIK UND IHRE V0RSCHLAEGE 

IHRE WAHL Te1 ete1:Nr ENV Btx:Nr 

Preste1:Nr TTY:Nr CR 

BEDIENGSANLTG:Teletel:GUIDE Btx:*l# 

Prestel:*1# TTY:/G/CR 


200al 


Hacking International: 

in verschiedenen Sprachen kann 
man sich 4 Informationen des 
E uropäischen Parlaments abrufen 


als Organisation „ASSOCIATES“ 
ein (das Passwort ist „INTL“), kann 
er Informationen über die Daten¬ 
netzdienste sämtlicher Länder der 
Erde, die über so etwas verfügen, 
abrufen. Auch Sachen wie „X.121 
Numbering Format“ oder „Interna¬ 
tional Trouble Reporting Procedu- 
res“ sind verfügbar. 

Autodial ist auch eine feine Sa¬ 
che, die die internationale Verstän¬ 
digung belebt und die Telefonko¬ 
sten dabei niedrig hält. Und wer 
schon einmal in einer amerikani¬ 
schen Phone-Mailbox drin war und 
mit dem Sysop gechattet hat, der 
weiß, was für ein erhebendes Ge¬ 
fühl es ist, wenn der arme Mensch 
an anderen Ende der Leitung gar 
nicht glauben will, daß man aus 
„Germany“ anruft. 

Unter einem Autodial stellt man 
sich am besten das Gegenstück zu 
einem Datex-Pad vor. Der Pad ist 
ein Rechner, der per Telefon ange¬ 
rufen wird und der dann in ein Da¬ 
tennetz schaltet. Ein Autodialer 
macht es gerade umgekehrt: Man 
kommt per Datennetz und wird ins 
Telefonnetz weitergeschaltet. Wo¬ 
bei dann natürlich nur Computer 
angerufen werden können. Stim¬ 
men überträgt kein Datennetz. Je 
nachdem, was für Accounts und 
Passwörter gerade im Umlauf sind, 
kann es recht kostensparend sein, 
sich unter Umständen ein paar mal 
hin- und herzuschalten. Und wel¬ 
cher gestreßte Postbeamte kann 
schon eine Spur weiterverfolgen, 
die von einer deutschen Amtslei¬ 
tung ins Datex-Netz geht, von dort 
zu Tymnet nach England, von dort 
per Satellit in einen (oder mehrere) 
amerikanischen Rechner und 
schließlich in einem der vielen 
amerikanischen Telefonnetze en¬ 
det. Sofern der Hacker es nicht 
vorzieht, mit dem Autodial wieder 
eine deutsche Nummer anzuwäh¬ 
len, um endlich mal zum Ortstarif 
eine Telefonmailbox anzurufen, die 
wesentlich außerhalb des Achtmi¬ 
nutentakts liegt. 

Hacker S. findet nicht nur viele 
Freunde auf seinen Streifzügen 
durch den Netzdschungel. Auch 
kilobyteweise Informationen liegen 
dort für ihn bereit, manches ist so¬ 
gar von den Verfassern zum freien 
Gebrauch bestimmt. Die interes¬ 
santesten Datenbanken und wie 
man sie benützt, werden im sech¬ 
sten Teil der digitalen Reisen des 
Hackers S. beschrieben. 

Joachim Graf 
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AKTIV 

#I£omputern 

Listing des 
Monats 

Revers! 


Das Programm variiert die Original-Spielregeln, indem es pro 
Zug nur eine Richtung zuläßt, die jeweils ausgewählt werden 
muß (CPC 464). 


Das Programm gestattet Ih¬ 
nen, in dem bekannten 
gleichnamigen Spiel gegen 
ihren Schneider-Computer 
anzutreten. Gespielt wird 
auf einem 8x8 Felder gro¬ 
ßen Spielfeld; Ein Spieler 
erhält rote, der andere 
grüne Spielsteine. Die Spie¬ 
ler setzen nun abwechselnd 
jeweils einen ihrer Steine so 
auf das Spielfeld, daß dieser 
eine zusammenhängende 
gerade Reihe des Gegners 
zusammen mit einem eige¬ 
nen, bereits gesetzten Stein 
einschließt. Dies kann in alle 
Richtungen, senkrecht, 
waagrecht oder diagonal 
geschehen. Die einge¬ 
schlossenen Steine des 
Gegners wechseln dann ihre 
Farbe, nehmen also die ei¬ 
gene Farbe an. Das Spiel ist 
beendet, wenn auf diese 
Weise kein Zug mehr mög¬ 
lich ist. Gewonnen hat der 
Spieler, der die meisten 
Steine seiner Farbe auf dem 
Spielfeld liegen hat. 

Nach dem Starten des BA- 
SlC-Programmes mit RUN 
wird ein Maschinenpro¬ 
gramm aus DATA-Zeilen in 
den Speicher gelesen. Alle 
Eingaben im Spiel gesche¬ 
hen ausschießlich über den 
Joystick oder das Cursorta¬ 
stenfeld (wobei die COPY- 
Taste als Feuerknopf dient). 
Zunächst müssen Sie wäh¬ 
len, ob Sie gegen den Com¬ 
puter spielen wollen oder 
bei einem DEMO-Spiel zu¬ 
schauen möchten. Bringen 
Sie dazu den Cursor (roter 
Pfeil) mit dem Joystick in die 
entsprechende Stellung 
und drücken den Feuer¬ 
knopf. 


Spiel gegen den Computer 

Wählen Sie zunächst aus, 
mit welcher Farbe Sie spie¬ 
len wollen, ob Sie den er¬ 
sten Zug machen möchten 
und in welcher Spielstufe 
(0-3) der Computer spielen 
soll. Die Spielstufe gibt an, 
wieviele Züge der Computer 
vorausdenkt. Die angege¬ 
benen Bedenkzeiten sind 
Durchschnittszeiten pro Zug 
und gelten nur für den Com¬ 
puter; Sie selbst können 
sich beliebig viel Zeit für ei¬ 
nen Zug lassen. Sind alle 
Eingaben gemacht, wird 
das Spielfeld angezeigt, 
und das Spiel kann begin¬ 
nen. Um einen Stein zu set¬ 
zen, fahren Sie mit dem Cur¬ 
sor (schwarzes oder weißes 
Kreuz) auf das entspre¬ 
chende Feld und drücken 
den Feuerknopf. Ist ein Ein¬ 
schließen der gegnerischen 
Steine nach mehreren Sei¬ 
ten möglich, müssen Sie zu¬ 
sätzlich noch die Richtung 
angeben. Fahren Sie dazu 
den Cursor auf das entspre¬ 
chende der acht Nachbar¬ 
felder und drücken den Feu¬ 
erknopf. 

Während des Spiels stehen 
Ihnen fünf Menüpunkte zur 
Verfügung. Um ins Menü zu 
gelangen, fahren Sie den 
Cursor einfach bei einem 
der fünf Pfeile links aus dem 
Spielfeld heraus. Der ent¬ 
sprechende Menüpunkt er¬ 
scheint dann in inverser 
Schrift. Auch im Menü kön¬ 
nen Sie den Cursor auf- und 
abwärts bewegen. Bei dem 
gewünschten Menüpunkt 
drücken Sie dann den Feu¬ 
erknopf. Um wieder ins 
Spielfeld zu gelangen, be- 


1 REM 7 77 77 77777 V 77 V 7 V V VVVV 

* I \l—I I JmZmfm/mfmfmfnfm/mfm/m/mfm/mfm fm fm fm fm fm fm 

2 REM 7. 7. 

3 REM 7- *** REVERS I *** 7. 

4 REM 7. y m 

5 REM "/. September 1985 X 

6 REM 7. 7. 

7 REM 7////.7//.7////////.X7.7.7.7.7.X7.7.7.7. 

8 : 

10 ON ERROR GOTO 7000 

20 SYMBOL AFTER 256:MEMORY &8FFF:P0KE &9 
000,0 

30 CLEAR:RANDOMIZE TIME 

40 ON ERROR GOTO 7000:ON BREAK GOSUB 30 
50 DEFINT a—z:DEFREAL l,p:DIM f(7,7),zu( 
128), s (B),m*(5),st(2) 

60 MODE IsINK 0,0:INK 1,3:INK 2,9:INK 3, 
13:PAPER OrBORDER 0:CLS 

61 REM Gruenmonitor: INK 1,9:INK 2,26:1 
NK 3,18 

70 FOR j=0 TO 79:KEY DEF j,0,&FF,&FF,&FF 
: NEXT 

80 KEY DEF 0,1,11,11,11:KEY DEF 1,1,9,9, 
9:KEY DEF 2,1,10,10,10:KEY DEF 8,1,8,8,8 
:KEY DEF 9,0,42,42,42 

90 KEY DEF 72,1,11,11,11:KEY DEF 75,1,9, 
9,9:KEY DEF 73,1,10,10,10:KEY DEF 74,1,8 
,8,8:KEY DEF 76,O,42,42,42:KEY DEF 77,0, 
42,42,42 

100 KEY DEF 48,1,11,11,11:KEY DEF 51,1,9 
,9,9:KEY DEF 49,1,10,10,10:KEY DEF 50,1, 
8,8,8:KEY DEF 52,O,42,42,42:KEY DEF 53,0 
? 42,42,42 

110 KEY DEF 66,0,252,252.252:SPEED KEY 1 

6,8:SYMBOL AFTER 240 

120 RESTORE 10100:FOR i=0 TO 10 

130 FOR j=0 TO 8: READ aS: 5 (j ) =VAL ( "&"+aS 

):NEXT 

140 SYMBOL s(0>,s(l),s<2>,s(3),s<4),s<5) 

,s(6),s(7),5(8) 

150 NEXT 

160 PEN 1:LOCATE 13,2:PRINT"R E V E R S 
I":LOCATE 24,4:PEN 2:PRINT CHR$(164);" 1 
985":PEN 3 

170 IF PEEK(&9000) THEN 220 

180 PRINT CHRS(IO);CHRS(10);"Bitte warte 

n ! " 

190 PRINT"Maschinenprogramm wird eingele 
sen. " 

200 GOSUB 8000:REM S9000-S939F 
210 PRINT"0.k-" 

220 PEN 2: PRINT STRINGS (3.10);*' SPIELMO 
DUS" 

230 PEN 1:PRINT CHRS(10);CHRS(10);" 1. 

";:PEN 3:PRINT"Du spielst gegen mich";:v 
=VP0S(#0) 

240 PRINT CHRS(10);" 2. DEMO: Ich spiel 

e mit mir selber" 

250 sm=l:GOSUB 6060:WHILE NOT te 

260 LOCATE 1,v+2*(sm-1):PEN 1:PRINT"> " ; 

HEXS(sm);"." 

270 GOSUB 6000:IF NOT(ta XOR tu) THEN 30 
0 

280 LOCATE 1,v+2*(sm-1):PEN 3:PRINT" "; 
HEXS(sm);"." 

290 sm=(1 AND ta)+(2 AND tu) 

300 WEND:IF sm=2 THEN 500 

310 CLS:PEN 3:PRINT"Wi11 st Du mit den "; 

s PEN 1:PRINT"roten";:PEN 3:PRINT" oder " 

;:PEN 2:PRINT"gr";CHRS(255);"nen":PEN 3: 
PRINT"Steinen spielen ?" 

320 PEN 1:PRINT CHRS(10)PEN 3:PRIN 
T" rot":PRINT" gr";CHRS(255);"n" 

330 f=l:GOSUB 6060:WHILE NOT te 
340 LOCATE l,3+f:PEN 1:PRINT">" 

350 GOSUB 6000:IF NOT(ta XOR tu) THEN 38 
0 

360 LOCATE 1,3+f:PRINT" " 

370 f=(l AND ta)+(2 AND tu) 


I 
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Schneider CPC 


ilKTIV 

rljjoWPUTERN 


wegen Sie einfach den Cur¬ 
sor nach rechts. 

Passen 

Ist ein Spieler nicht in der 
Lage, einen erlaubten Zug 
zu machen, so muß er,,pas¬ 
sen“, und der andere Spie¬ 
ler kommt wieder an die 
Reihe. Passen ist jedoch nur 
erlaubt, wenn tatsächlich 
kein Zug mehr möglich ist. 
Tip 

Der Computer sagt Ihnen, 
welchen Zug er an Ihrer 
Stelle tun würde. Zeigt er 
mehrere Züge an, dann be¬ 
trachtet er diese als gleich¬ 
wertig. Es ist Ihnen freige¬ 
stellt, diesen oder einen 
anderen Zug zu machen. 
Seitenwechsel 
Der Computer spielt mit Ih¬ 
ren und Sie mit seinen Stei¬ 
nen weiter. 

Zug zurücknehmen 
Der letzte Zug im Spiel wird 
zurückgenommen. Dieser 
Menüpunkt kann so oft auf¬ 
gerufen werden, bis sich 
das Spiel wieder in der Aus¬ 
gangsstellung befindet. 
Hinweis: Bei ,.Seitenwech¬ 
sel“ und ,,Zug zurückneh¬ 
men“ ist es möglich, daß 
nicht mehr Sie, sondern der 
Computer am Zug ist. Dieser 
Fall wird dann angezeigt. 
Sie können dann entweder 
noch weitere Züge zurück¬ 
spielen, oder, wenn der 
Computer den Zug ausfüh¬ 
ren soll, mit dem Cursor auf 
ein beliebiges Feld auf dem 
Spielfeld fahren und den 
Feuerknopf drücken. 


Spielstufe ändern 

Auch während des Spiels 
kann die Spielstufe geän¬ 
dert werden. Sie kann zum 
Beispiel für einen Tip kurzfri¬ 
stig erhöht werden. Fahren 
Sie einfach den Cursor auf 
die gewünschte Zahl und 
drücken Sie den Feuer¬ 
knopf. Während des Spiels 
werden jeweils die 19 letzten 
Doppelzüge rechts ange¬ 
zeigt. Das Spiel kann durch 
zweimaliges Drücken der 
ESC-Taste auch abgebro¬ 
chen werden, jedoch nicht, 
solange der Text ,.Ich über¬ 
lege.“ angezeigt wird. Beim 
Abbruch erscheint wieder 
das Titelbild, und Sie kön¬ 
nen erneut ein Spiel begin¬ 
nen. Das Spiel ist regulär 
beendet, wenn das Spielfeld 
voll ist oder kein Zug mehr 
möglich ist. In diesem Fall 
wird das Endergebnis ange¬ 
zeigt. Durch Drücken des 
Feuerknopfes können Sie 
ein neues Spiel starten. 
DEMO-Spiel 

Wählen Sie zunächst aus, in 
welchen Spielstufen die 
Gegner jeweils spielen sol¬ 
len. Anschließend brauchen 
Sie nichts mehr einzugeben 
und können das Spiel ver¬ 
folgen. Es werden jeweils 
das Spielfeld und die 19 
letzten Doppelzüge ange¬ 
zeigt. Ein Eingreifen in das 
Spiel ist nicht möglich. Sie 
können es lediglich, wie 
oben beschrieben, abbre¬ 
chen. 

Michael Knaup 


Der Autor stellt sich vor 


Obwohl mein Lebenslauf 
nach 17 Jahren noch nicht 
allzu lang ist, möchte ich 
mich doch kurz vorstellen: 
1979 habe ich mit Erfolg die 
Grundschule beendet, in¬ 
zwischen besuche ich die 
11. Klasse Gymnasium. 
Meine ersten Erfahrungen 
mit Computern machte ich 
mit fünf Jahren auf einem 
Wang 600 — einem der er¬ 
sten Kleincomputer über¬ 
haupt. BASIC lernte ich erst 
später mit Hilfe des pro¬ 
grammierbaren Taschen¬ 
rechners Sharp PC-1211. 
Seit eineinhalb Jahren be¬ 
schäftige ich mich nun in¬ 
tensiv mit dem CPC 464. 
Meine Hobbys sind neben 
Computern noch Orgel- 



Michael Knaup, Autor von 
Heversi 


spielen, Fotografieren und 
Arbeiten mit Holz. 


380 WEND 

390 LÜCATE 1,8s PEN 3s PRINT"Wi11 st Du den 
ersten Zug machen ?" 

400 PEN 1 SPRINT CHR$(10);">";s PEN 3sPRIN 
T" ja":PRINT" nein" 

410 55 = 1 s GOSUB 6060:WHILE NOT te 
420 LOCATE l,9+ss:PEN lsPRINT">" 

430 GOSUB 6000sIF NOT(ta XOR tu) THEN 46 
O 

440 LOCATE 1,9+sssPRINT" " 

450 ss=(l AND ta)+(2 AND tu) 

460 WEND 

470 5 C=ss XOR 3ss(ss)=f:s(sc)=f XOR 3 
500 CLSsPEN 2s ZONE 15s PRINT"SPIELSTUFE", 
"Bedenkzeit pro Zug ca." 

510 PEN 1 .-PRINT CHR* (10) ; " > 0",sPEN 3s P 
RINT" "? CHR$(169);" sec." 

520 PRINT" 1 ",» 3 sec." 

530 PRINT" 2","30 sec." 

540 PRINT" 3","10 min." 

550 IF sm=l THEN GOSUB 900s GOTO 600 
560 s(l)=lss(2)=2:FOR j=l TO 2 
570 LOCATE 1, 8 :PRINT"Bitte Spielstufe f" 
?CHR$(255 >5 "r Spiei er";j;sIF j = l THEN PE 
N IsPRINT"(rot)" ELSE PEN 2s PRINT"(gr";C 
HR*(255);"n)" 

580 PEN 3s PRINT"eingeben !"sGOSUB 900s st 
(j)=stsLOCATE 1,3+stsPEN 3s PRINT" ";st 
590 NEXT 
600 CLSsINK 3,0 

610 ORIGIN 152,56,152,466,56,374sCLG 3 
620 PAPER 3s PEN OsFOR j = l TO 8 
630 LOCATE^ 11+2* j , 3s PRINT CHR$(64+jj 
640 LOCATE 11+2*j,21:PRINT CHR*(64+j) 

650 LOCATE 11,3+2*jsPRINT CHR$(48+j) 

660 LOCATE 29,3+2*jsPRINT CHR$(48+j) 

670 NEXT 

680 FOR 1=—5.5 TO 5.5 
690 sI=CINT(SQRC36—1^2))*2 
700 FOR i=326 TO 102 STEP-32 
710 FOR j=200 TO 424 STEP 32 
720 ORIGIN j,i 

730 MOVE -sl,-INT(1)*2s DRAWR 2*sl-2,0,0 

740 NEXT j,i,1:INK 3,13 

741 REM Gruenmonitor: INK 3,18 

750 x =3 s y=3:f =s(1)sf(x,y)=l:GOSUB 6100 
760 x =4 s y=3 s f =s( 1 )sf(x,y)=ls GOSUB 6100 
770 x=3sy=4sf=s(2)sf(x,y)=2sGOSUB 6100 
780 x =4 s y=4 s f =s(2)sf(x,y)=2 s GOSUB 6100 
790 q=2ss(0)=0 
800 ON sm GOTO 1000,1500 
810 : 

900 st=0:GOSUB 6060sWHILE NOT te 
910 LOCATE 1,3+stsPEN lsPRINT"> " • st 
920 GOSUB 6000sIF NOT(ta XOR tu) THEN 95 
0 

930 LOCATE 1,3+stsPEN 3SPRINT" ";st 
940 st=(st+ta-tu) AND 3 
950 WENDsRETURN 

1000 s 

1001 REM 777777777777777777777777 

1002 REM 7 Spiel gegen Computer 7 

1003 REM 77777777777777777777777.7 

1004 s 

1010 PAPER Os PEN 2sLOCATE 14,1sPRINT"Spi 

eistufe "ssPEN 3:PRINT st 

1020 PEN 2sLOCATE 1,3s PRINT"MENUE" 

1030 mlf*=CHR*(13)+CHR$(10):m$(l)="Passe 
n"s m*(2)=" Tip"s m*<3)="Seiten-"+mlf $+"wec 
hsel"s m*(4)="Zug"+mlf *+"z ur"+CHR$(255)+" 
ck—"+mlf$+"nehmen"sm$(5)="Spiel-"+ml f$+" 
stufe"+mlf$+CHR*(253)+"ndern"sFOR j=l TO 
5s m$ ( j ) =m$ ( j ) +ml f -S+CHR* (10) s NEXTs m$ (3) = 
m*(3)+CHRS(10) 

1040 LOCATE 1,5sFOR j=l TO 5 

1050 PEN 2s PRINT TAB(9);CHR*(242);CHR*(1 

3);s PEN 3s PRINT m$(j); 

1060 NEXT 
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1070 WIND0W#1,1,40,24,25:PAPER#1,0:PEN # 
1,3:CLS#1 

1080 WIND0W#2,31,40,3,23:PAPER#2,0:CLS#2 
HOO WHILE s<60 AND fp<2 
1110 q=q XOR 3 

1120 ÜN (q=ss)+2 GOSUB 3000,4000 
1130 CLS#1:GOSUB 2000 
1140 WEND 
1150 GOTO 5000 

1500 : 

1501 REM 7.7.7.7.7.7.7.'X7.7.7.7.7.7. 

1502 REM 7. Demo-Spiel 7. 

1503 REM 7.7.7.7.7.7.7.7.7.7.7.7.7.7. 

1504 : 

1510 PAPER 0:LOCATE 1,3:PEN 1:PRINT"Spie 
ler 1 ".-LOCATE 1,5: PEN 3:PRINT"Stufe";st( 
1) 

1520 LOCATE 1,9:PEN 2:PRINT"Spieler 2":L 
OCATE 1,11:PEN 3:PRINT"Stufe":st(2) 

1530 LOCATE 15,1:PEN 2:PRINT"DEM0 - SPIE 
L” 

1540 WINDOW#1,1,40,24,25:PAPER#1,0:PEN # 
1,3:CLS#1 

1550 WIND0W#2,31,40,3,23:PAPER#2,O:CLS#2 
1600 WHILE s<60 AND fp<2 
1610 q=q XOR 3 

1620 sc=q:st=st(q):GOSUB 4000 
1630 CLS#1:GOSUB 2000 
1640 WEND 
1650 GOTO 5000 
2000 : 

2001 REM 7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7. 

2002 REM 7. Zug ausfuehren 7. 

2003 REM 7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7. 

2004 : 

2010 zu=zu+l:zu(zu)=z AND 63 

2020 IF zu MOD 2 THEN PEN#2,3:PRINT#2,US 

ING "##";CINT(zu/2); 

2030 IF z=512 THEN fp=fp+l:a»=” - ":zu< 
zu)=-l:GOTO 2100 

2040 x=(z AND 56)/8:y=z AND 7:z=(z AND 4 
48) /64 

2050 fp=0:s=s+l:a»=" "+CHR»<65+x)+CHR»(4 
9+y)+CHR»(240+z) 

2060 FOR j=l TO 5:f=s(q)+(j MOD 2):GOSUB 
6100:NEXT: f (x,v)=q 

2070 RESTORE:FOR j=l TO z+l:READ rh,rv:N 
EXT 

2080 x=x+rh:y=y+rv:IF f(x,y) = (q XOR 3) T 
HEIM f <x,y)=q:f=s(q) : GOSUB 6100: GOTO 2080 
2090 zu(zu)=zu(zu)+512*x+64*y 
2100 PEN#2,s(q>:PRINT#2,a»; : IF q=l THEN 
PRINT#2,CHR»(1O); CHR»(IO);CHR»(11);CHR»( 
11 ) ; 

2110 RETURN 

3000 : 

3001 REM 7.7.7.7.7.7.7.7.7.7.7.7.7.7.7. 

3002 REM 7. Spieler Zug 7. 

3003 REM 7.7.7.7.7.7.7.7.7.7.7.7.7.7.7. 

3004 : 

3010 DEF FN menue(x)=x+l-(CINT<x/4) AND 
(x>2)):x=3:y=3:CLS#1:PRINT#1,CHR»(7);CHR 
»(10);"Bitte Zug eingeben !" 

3020 GOSUB 6060:WHILE NOT te 

3030 IF x=-l THEN PAPER 3:PEN 1:LOCATE 1 

,5+2*y:m=FN menue(y):PRINT m»(m> 

3040 IF x>-l THEN PAPER s (f(x,y)>:PEN 3- 
3*SGN(f< x,y)):LOCATE 13+2*x,5+2*y:PRINT 
CHR»(159) 

3050 GOSUB 6000 

3060 IF NOT(ta OR tu OR tl OR tr OR te) 
THEN 3130 

3070 IF x=-l THEN PAPER 0:PEN 3:LOCATE 1 
,5+2*y:m=FN menue(y):PRINT m»(m) 

3080 IF x>-1 THEN PAPER s<f(x,y)):LOCATE 
13+2*x,5+2*y:PRINT" " 

3090 x=x+tl-tr 

3100 IF x<-l THEN x=-l ELSE IF x>7 THEN 


x=0 

3110 y= <y+ta—tu) AND 7 

3120 IF x — 1 AND <y=3 OR y=5 OR y=7) THE 
N IF ta XOR tu THEN 3110 ELSE x=0 
3130 WEND 

3140 IF x=-l THEN ON FN menue(y) GOTO 35 
00,3600,3700,3800,3900 
3150 IF q=sc THEN 4000 

3160 IF f (x , y) < >0 THEN CLS#1:PRINT#1,CHR 
»(7):CHR»<IO);"Feld schon besetzt !":GOT 
O 3020 

3170 RESTORE:z=-l:fm=0: FOR j=0 TO 7 
3180 READ rh,rv:a=x:b=y:fz=0 
3190 a=a+rh:b=b+rv 

3200 IF a<0 OR a>7 OR b<0 OR b>7 THEN 32 
40 

3210 IF f (a, b) =0 THEN 3240 
3220 IF f(a,b)=sc THEN fz=-l:GOTO 3190 
3230 IF fz THEN IF z>-l THEN fm=-l:j=7 E 
LSE z=j 

3240 NEXT:IF z=—1 THEN CLS#1:PRINT#1,CHR 
»(7);CHR»(10);"Unerlaubter Zuq !":GOTO 3 
020 

3250 IF NOT fm THEN 3450 

3260 CLS#1:PRINT#1,CHR»(7); CHR»(10);"Bit 
te Richtung angeben !" 

3270 LOCATE 13+2*x,5+2*y:PAPER 0:PEN s(s 
s):PRINT CHR»(231) 

3280 f1=0:GOSUB 6060:FOR i=l TO 0 STEP-1 
3290 RESTORE:FOR j=0 TO 7 
3300 READ rh,rv:a=x +rh:b=y+rv 
3310 IF a>=0 AND a<8 AND b>=0 AND b<8 TH 
EN LOCATE 13+2*a, 5+2*b: PAPER s(-f(x+rh,y+ 
rv)):PEN i*3+(1-i)*s(T<x+rh,y+rv)):PRINT 
CHR»(240+j) 

3320 NEXT:FOR j=l TO 10:IF INKEY»<>"" OR 
fl THEN j=10:f1=—1 
3330 NEXT j,i:IF NOT fl THEN 3280 
3340 a=x:b=y:GOSUB 6060:WHILE NOT te 
3350 LOCATE 13+2*a,5+2*b:PAPER s(f(a,b)> 

:PEN 3—3*SGN(f(a,b>):PRINT CHR»(159> 

3360 GOSUB 6000:IF NOT(ta OR tu OR tl OR 
tr OR te) THEN 3390 

3370 LOCATE 13+2*a,5+2*b:IF a=x AND b=y 
THEN PAPER 0:PEN s(ss):PRINT CHR»(231) E 
LSE PAPER s(f(a,b)):PRINT" " 

3380 a=a+tl-tr:a=a+(a>7)-(a<0):a=a+(a>x+ 
1>-(a<x-l):b=b+ta-tu:b=b+(b>7)-(b<0):b=b 
+ (b >y+l) — (b<y-l) 

3390 WEND:IF a=x AND b=y THEN 3340 
3400 RESTORE:FOR j=0 TO 7 

3410 READ rh,rv:IF a—x=rh AND b-y=rv THE 
N z=j:j=7 

3420 NEXT:a=x:b=y:fz=0:f1=0 

3430 a=a+rh:b=b+rv:IF a<0 OR a>7 OR b<0 

OR b>7 THEN fl=-l ELSE IF f(a,b)=0 THEN 

fl=-l ELSE IF f(a,b)=sc THEN fz=-l:GOTO 

3430 ELSE IF NOT fz THEN fl=-l 

3440 IF fl THEN CLS#1:PRINT#1,CHR»(7);"U 

nerlaubter Zug !":PRINT#1,"Bitte Richtun 

g angeben !":GOTO 3340 

3450 z=z*64+x*8+y 

3460 RETURN 

3500 : 

3501 REM *** 

3502 REM Passen 

3503 REM *** 

3504 : 

3510 sc=sc XOR 3:st(1)=st:st=0:GOSUB 402 
0:st=st(1):sc=sc XOR 3 

3520 IF z=512 THEN CLS#1:PRINT#1,CHR»(7) 
iCHR»(10);"0.k.":RETURN 

3530 CLS#1:PRINT#1,CHR»(7);CHR»(10);"Nur 
passen, wenn Ziehen unm";CHR»(254);"gli 
ch ! " 

3540 x =-1:y=0:GOTO 3020 

3600 : 

3601 REM *** 
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3602 REM ### Tip 

3603 REM *** 

3604 : 

3610 sc—sc XOR 3:GOSUB 4000:sc=sc XOR 3 
3620 CLS#1: PRINT#1 , CHR*(7) ; CHR* (IO) : "Mei 
n Tip: "; 

3630 PEN#i,s(ss):z=PEEK(&A009):IF z=0 TH 
EN PRINT#1,"Passen":GOTO 3680 
3640 FOR j=0 TO (z-l)*2 STEP 2 
3650 z=PEEK(&A200+j)+256+PEEK(&A20H-j) 
3660 PRINT#1,CHR$(65+(z AND 56)/8>;CHR*( 
49+(z AND 7));CHR$(240+(z AND 448)/64) ; " 
■» 

3670 NEXT 

3680 PEN#1,3:x=-l:y=l:GOTO 3020 

3700 : 

3701 REM *** 

3702 REM *** Seitenwechsel 

3703 REM *** 

3704 r 

3710 ss=sc 2 sc=sc XOR 3 

3720 CLS#1s PRINT# 1 ,CHR$ (7); CHR$(10)2"0. k 
- Du spielst jetzt mit "; 

3730 ON s(ss > GOSUB 3780,3790 
3740 PRINT#1," weiter.“ 

3750 IF q=sc THEN PEN#1,1s PRINT#1,"Achtu 
ng ";2 PEN#1,32 PRINT# 1 , " , ich bin am Zug ! 

ii 

3760 GOTO 3020 

3780 PEN#1,1:PRINT#1,"rot";:PEN#1,3:RETU 
RN 

3790 PEN#1,2:PRINT#1,"gr";CHR*(255);"n"; 

:PEN#1,3:RETURN V 

3800 : 

3801 REM *** 

3802 REM **# Zug zuruecknehmen 

3803 REM *** 

3804 : 

3810 IF zu=0 THEN CLS#1:PRINT#1,CHR$(7) ; 
CHR$(10);"Spiel bereits in Ausganqsstel 1 
ung !":GOTO 3020 

3820 IF zu(zu)=—1 THEN 3840 ELSE GOSUB 3 
890: f (x ,y) =0: f =0: GOSUB 6100 
3830 WHILE x<>x2—rh OR y<>y2—rv:x=x+rh:y 
=y+rv:f(x,y)=q:f=s<q):GOSUB 6100:WEND 
3840 x=7—6*(zu MOD 2):y=CINT(zu/2):IF y> 
19 THEN y=19 

3850 L0CATE#2,x,y:PRINT#2,CHR$(18):LOCAT 
E#2,x,v 

3860 IF (zu MOD 2)=1 AND zu>38 THEN zu=z 
u—38:PEN#2,3:PRINT#2,CHR$(30):CHR$(11);: 
PRINT#2,USING"##";CINT(zu/2);:GOSUB 3890 
:PEN#2,s(1):GOSUB 3880:zu=zu+l:GOSUB 389 
OsPEN#2,s(2):GOSUB 3880:zu=zu+37:LOCATE# 
2,1,20 

3870 zu—zu—1:s=s—1:q=q XOR 3:x=-l:y=4:CL 
S#1:PRINT#1,CHR$(7):CHR*(10):"O.k.":GOTO 
3750 

3880 RESTORE:z=—1:rh1=0:rh2=0:WHILE rh<> 
rh1 OR rv<>rvl:READ rh1,rvl:z=z+l:WEND:P 
RINT#2,” ";CHR$(65+x);CHR$(49+y);CHR$(24 
O+z);:RETURN 

3890 z=zu(zu>:x=(z AND 56>/8:y=z AND 7:x 
2=(z AND 3584)/512:y2=(z AND 448)/64:rh= 
SGN(x2—x):rv=SGN(y2-y):RETURN 

3900 : 

3901 REM *** 

39.02 REM *#■* Spiel stufe aendern 

3903 REM *** 

3904 : 

3910 CLS#1:PRINT#1,CHR$(7);CHR$(10);"Neu 


e Spielstufe: 012 3":x=st 
3920 GOSUB 6060:WHILE NOT te 
3930 LOCATE#1.19+2*x,2:PAPER#1,3:PEN#1,1 
: PRINT#1,HE X $(x) 

3940 GOSUB 6000:IF NOT(ta OR tr OR tu OR 
tl OR te) THEN 3970 

3950 LOCATE#1,19+2*x,2:PAPER#1,0:PEN#1,3 
:PRINT#1,HEX*(x) 

3960 x=(x+t1 —tr) AND 3:y=(y+ta-tu) AND 3 
3970 WEND:CLS#1:PEN#1,3:PAPER#1,O:PRINT# 
1,CHR$(7):CHR$(10):"O.k.":LOCATE 26,1:PA 
PER O:PEN 3:PRINT HEX*(x) 

3980 st=x:x =-1:y=6:GOTO 3020 

4000 : 

4001 REM 7.7.7..7.7.7.7.7.7.7.7.7.7.7.7.7. 

4002 REM 7. Computer Zug V. 

4003 REM 7.7.V.7.7.7.7.7.7.7.7.7.7.7.7.7. 

4004 : \ 

4010 CLS#1:PRINT#1,CHR$(10):"Ich ":CHR$( 
255);"berlege." 

4020 IF sc—1 THEN x=0 ELSE x=3 

4030 z =&A300: FOR i=0 TO 7: FOR _i=0 TO 7 

4040 POKE z,(f(j,i> XOR x>*SGN(f(j,i>) 

4050 z=z+l:NEXT j,i 

4060 POKE &A006, st+1: CALL 5-9000 

4070 z=PEEK(5(A009) : IF z=0 THEN z =512: RET 

URN 

4080 r=INT(RND*z>*2 

4090 z =PEEK (5-A200+r) +256*PEEK (&A201 +r) 
4100 RETURN 

5000 : 

5001 REM 7.7.7.7.7.7.X7. 

5002 REM V. Ende 7. 

5003 REM 7.7.7.7.7.7.7.7. 

5004 : 

5010 CLS#1:PEN#1,1:PRINT#1,CHR$(7);"Spie 
lende";:PEN#1,3:IF fp=2 THEN PRINT#1," ( 
kein Zug mehr m";CHR$(254);"glich)" 

5020 f=s(l):s(l)=0:s(2>=0 

5030 FOR i=0 TO 7:F0R j=0 TO 7:s(f(j,i)) 

=s(f(j,i))+l:NEXT j,i 

5040 L0CATE#1,1,2:PRINT#1,"Ergebnis: ";: 
PEN#1,f:PRINT#1,s(1);:PEN#1,3:PRINT#1,": 
";:PEN#l,f XOR 3:PRINT#1,s(2); 

5050 IF sm=2 THEN 5100 

5060 LOCATE#1,22,2:PEN#1,3 

5070 IF s(1)=s(2) THEN PRINT#1,"Unentsch 

ieden."; 

5080 IF s(sc)>s(ss) THEN PRINT#l,"Ich ha 
be gewonnen.": 

5090 IF s(sc)<s (ss) THEN PRINT#1,"Du has 
t gewonnen."; 

5100 GOSUB 6060:WHILE NOT te 
5110 GOSUB 6000:WEND 
5120 GOTO 30 
6000 : 

6001 REM 7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7. 

6002 REM 7. Tastaturabfrage 7. 

6003 REM 7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.X7.7. 

6004 : 

6010 t$=INKEY$ 

6020 ta=(t#=CHR$(11)):tu=(t^=CHR^(10)) 
6030 tl=(t$=CHR#(8)):tr=(t*=CHR*(9)) 

6040 te=(t$=”*") 

6050 RETURN 

6060 ta=0:tu=0:tl=0:tr=0:te=0 
6070 WHILE INKEY$<>"”:WEND 
6080 RETURN 
6100 : 

6101 REM 7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7. 

6102 REM 7. Spielstein setzen 7. 

6103 REM 7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7. 

6104 : 

6110 ORIGIN 200+32*x,326-32*y 

6120 FOR 1=—5.5 TO 5.5 

6130 sl=CINT(SQR(36-l~2>)*2 

6140 MOVE -sl,-INT(l)*2:DRAWR 2*sl-2,0,f 

6150 NEXT:RETURN 
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7000 : 

7001 REM 7.X7.7.7.7.7.7.7. 

7002 REM 7. Error 7. 

7003 REM 7.7.7.7.7.7.7.7.7. 

7004 : 

7010 MODE 1:INK 0,0: INK 1 , 13: INK 2-,6:PAP 
ER O:BORDER 1:CLS 

7020 ORIGIN 0,0,0,640,0,400:CLG O 
7030 PLOT —10,0,1:MDVE 64,288 
7040 PRINT CHR$<5);CHR$<162>; 

7050 LOCATE 17,3:PEN 2:PRINT"Error." 

7060 LOCATE 2,6:PEN 1:PRINT"Bitte Comput 
er mit CCtrlXShiftXEsc>" 

7070 PRINT CHR$(10);" zurucksetzen und P 
rogramm erneutPRINT CHR#<10);" laden ! 


7080 CALL &BB00:LOCATE 1,15 
7090 END 
8000 : 

8001 REM 7.7.7.7.7,7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7. 

8002 REM ’/. Maschi nenprogramm ei niesen 7. 

8003 REM 7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7.7. 

8004 : 

8010 RESTORE 10210:p=0 

8020 FOR i=0 TO 57.-F0R j=0 TO 15 

8030 READ a$: a=VAL ("S<"+a^) 

8040 p=p+a:POKE &9000+16*i+j,a 
8050 NEXT 

8060 READ 1:IF p<>1 THEN 8100 
8070 NEXT 
8080 RETURN 

8100 CLS:PRINT"DATA—Error in Zeile"; 

8110 PRINT 10210+i*10 

8120 PRINT"Bitte korriqieren !" 

8130 PRINT:CALL &BBOO:CLEAR 
8140 END 

10000 : 

10001 REM 7.77.7.7.7.7.7.7. 

10002 REM 7. Daten 7. 

10003 REM 77.7.7.7.7.7.7.7. 

10004 : 

10010 REM 

10011 REM 

10012 REM 

10013 : 

10020 DATA 0,-1,0,1,-1,0,1,0,-1,-1,1,-1, 

1 , 1 ,- 1,1 


**.* 

*** Zugrichtungen 
*** 


10100 : 

10101 REM *** 

10102 REM *** Zeichenumde-f initionen 

10103 REM *** 

10104 : 

10110 DATA FO,18,3C,7E,7E,18,18,18,OO,F1 
,18,18,18,7E,7E,3C,18,00,F2,00,30,70,FE, 
FE,70,30,OO,F3,00,18,IC,FE,FE,IC,18,00,F 
4, F8 ,F8, FO, F8, DC, OE, 06,00 ,F5,3E, 3E, IE, 3E 
,76,EO,CO,00,F6,CO,EO,76,3E,IE,3E,3E,00, 
F7,06,OE,DC,F8,FO,F8,F8,00 
10120 DATA FD,66,00,78,OC,7C,CC,76,00,FE 
,66,00,3C,66,66,66,3C,00,FF,66,00,66,66, 
66,66,3E,00 
10200 : 

10201 REM *** 

10202 REM *** Maschinenprogramm 

10203 REM *** 

10204 : 


10210 DATA CD,89,92,AF,32,09,AO,3C,32,00 
,AO,32,05,AO,3C,32,1477 

10220 DATA 01,AO,FD,21,00,AO,F3,CD,48,91 
,FB,C9,DD,21,OA,AO,3625 

10230 DATA 11,06,00,FD,46,05,DD,19,IO,FC 
,C9,FD,5E,05,16,00,5065 

10240 DATA 06,06,A7,CB,13,CB,12,10,FA,21 
,00,A3,19,C9,78,82,6625 

10250 DATA 57,79,83,5F,79,87,87,87,80,85 
, 6F,C9,F5,C5,D5,CD,9018 

10260 DATA 2B,90,D1,D5,7B,07,07,07,82,85 
,6F,D1,C1,F1,C9,15,11010 


10270 DATA ID,01,01,00,18,13,14,ID,01,08 
,OO,18,0C,15,IC,01,11228 

10280 DATA 01,00,18,05,15,ID,Ol,08,00,CD 
,4C,90,FD,36,04',FC, 12305 

10290 DATA IE,03,7E,B7,C8,09,ID,20,F9,FD 
,36,04,01,C9,15,ID,13729 

10300 DATA 18,OA,14,ID,18,06,14,IC,18,02 
,15,1C,CD,4C,90,FD,14643 

10310 DATA 36,04 , E7,7E, B7, C8 , FD , 36,04,01 
,C9,15,18,07,14,18,16050 

10320 DATA 04,ID,18,01,IC,CD,4C,90,FD,36 
,04,01,A6,C8,FD,36,17546 

10330 DATA 04,OA,C9,FD,35,05,CD,2B,90,FD 
,34,05,E5,11,40,00,19084 

10340 DATA 19,EB,E1,01,40,00,ED,B0,C9,3A 
,05,AO,FD,BE,06,30,20968 

10350 DATA OA,DD,6E,06,DD,66,07,22,07,AO 
,C9,CD,2B,90,E5,21,22701 

10360 DATA FF,AO,01,00,80,1E,00,16,00,E3 
, 7E, 23, E3,23, B7,28,24170 

10370 DATA 35,32,02,AO,7E,CB,7F,28,19,CB 
,BF,C5,D5,E5,C6,90,26331 

10380 DATA 6F,26,93,6E,26,90,3A,02,AO,CD 
,F8,FF,3A,04,A0,E1,28294 

10390 DATA Dl,CI,FD,35,02,20,02,ED,44,E5 
,26,00,6F,CB,7F,28,30091 

10400 DATA 01,25,09,44,4D,El,14,CB,5A,28 
,BE,1C,CB,5B,28,B7,31596 

10410 DATA FD,71,07,FD,70,08,El,C9,CD,C3 
,90,3A,00,AO,32,01,33581 

10420 DATA A0,EE,03,32,00,AO,CD,IC,90,3E 
,FE,FD,86,01,DD,77,35613 

10430 DATA 00,DD,77,01,DD,36,05,00,CD,2B 
,90,2B,E5,DD,36,02,37175 

10440 DATA 00,DD,36,03,00,El,23,E5,7E,B7 
, C2,68,92, DD, 36,04,38974 

10450 DATA 00,DD,56,03,DD,5E,02,FD,36,04 
,00,DD,7E,04,07,C6,40468 

10460 DATA 80,6F,26,93,46,23,4E,El,E5,CD 
,3E,90,7A,B3,CB,5F,42539 

10470 DATA C2,5E,92,7E,B7,CA,5E,92,FD,BE 
,00,20,06,FD,36,04,44516 

10480 DATA 01,18,E6,3A,04,AO,B7,CA,5E,92 
,DD,56,03,DD,5E,02,46245 

10490 DATA El,E5,3A,01,AO,77,CD,3E,90,3A 
,00,AO,BE,20,05,EE,48131 

10500 DATA 03,77,18,F2,3A,05,AO,FD,BE,06 
,30,IE,FD,34,05,CD,49784 

10510 DATA 48,91,DD,7E,05,B7,20,OC,CD,EB 
,90,2A,07,AO,DD,75,51711 

10520 DATA 00,DD,74,01,FD,35,05,CD,IC,90 
,CD,D9,90,CD,C3,90,53847 

10530 DATA DD,5E,00,DD,56,01,2A,07,A0,CD 
,B8,FF,FD,CB,05,46,55854 

10540 DATA 28,01 ,3F , 38, OF, DD, 75,00, DD, 74 
,01,3A,05,AO,3D,20,57021 

10550 DATA 39,32,09,AO,3A,05,A0,3D,20.30 
,DD,5E,00,DD,56,Ol,58284 

10560 DATA CD,B8,FF,20,25,FD.6E,09,FD,34 
,09,16,00,DD,5E,04,60024 

10570 DATA A7,CB,1B,CB,1B,CB,1B,CB,12.DD 
,7E, 03,07,07,07,DD,61694 

10580 DATA B6,02,B3,CB,05,26,A2,77,23,72 
,DD,36,05,01,DD,34,63287 

10590 DATA 04,DD,CB,04,5E,CA,81,91,DD,34 
,03,DD,CB,03,5E,CA,65288 

10600 DATA 75,91,DD,34,02,DD,CB,02,5E,CA 
,71,91,3A,00,A0,32,67073 

10610 DATA 01,A0,EE,03,32,00,A0,E1,C9,CD 
,00,B9,21,12,A3,OE,68729 

10620 DATA 04,06,04,7E,23,B7,28,ID,10,F9 
,23,23,23,23,OD,20,69606 

10630 DATA FO, 3E, FC, 32,7F ,90,3E, E7,32, A2 
,90,3E,0A,32,CI,90,71589 

10640 DATA- 21,40,93,18,12,3E,F6,32,7F,90 
,3E,9C,32,A2,90,3E,73140 

10650 DATA 28,32,CI,90,21,00,93,11,00,Al 
,01,40,00,ED,BO,C9,74604 
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10660 DATA 00,00,00,00,00,00,00,00,00,00 
,00,00,00,00,00,00,74604 

10670 DATA 00,00,00,00,00,00,00,00,00,00 
,00,00,00,00,00,00,74604 

10680 DATA 00,00,00,00,00,00,00,00,00,00 
,00,00,00,00,00,00,74604 

10690 DATA 64,88,28,28,28,28,89,64,8A,84 
,80,80,80,80,85,8A,76290 

10700 DATA 28,83,05,02,02,05,81,28,28,83 
,02,01,01,02,81,28,76990 

10710 DATA 28,83,02,01,01,02,81,28,28,83 
,05,02,02,05,81,28,77690 

10720 DATA 8B,87,82,82,82,82,86,8B,64,88 
,28,28,28,28,89,64,79390 

10730 DATA 19,88,0A,0A,0A,0A,89,19,8A,84 
,80,80,80,80,85,8A,80B06 

10740 DATA 0A,83,02,02,02,02,81,0A,0A,B3 
,02,01,01,02,81,0A,81380 

10750 DATA OA,83,02,01,01,02,81,OA,OA,83 

l8?&8 2 ß&? A°86®8^8i® 82^82,82,86, SB, 19,88 
,OA,OA,OA,OA, 89,19,83384 

10770 DATA 00,FF,00,Ol,FF,00,01,00,FF,FF 
,01,FF,01,01,FF,01,84920 

10780 DATA 5F,66,6D,74,8E,92,96,9A,AB,AE 
,Bl,B4,00,00,00,00,86636 
10790 : 


Directory-Druck 

Wie der Name des Programms es schon andeutet, kann man 
das Inhaltsverzeichnis einer Diskette ausdrucken lassen und 
das in einer Form, die jedes Geo-Dreieck und jede Schnei¬ 
demaschine überflüssig macht (Schneider CPC). 

Man hat die Wahl zwischen 
einer „Catcopy“ (sortierter 
Ausdruck mit Größenan¬ 
gabe jeder Datei) und einer 
„Dircopy“ (unsortierter Aus¬ 
druck ohne Größenangabe). 

Wer schon eine gewisse An¬ 
zahl Disketten sein eigen 
nennen kann, wird aus leidi¬ 
ger Erfahrung die Suche 
nach der richtigen Diskette 
und der richtigen Datei nur 
zu gut kennen. Welche 
Wohltat, wenn man nur noch 


10 'Titelbild 

20 MODE Os INK 1,26s INK 0,0s PAPER 1sPEN O 
sBORDER OsCLS 

30 LOCATE 5,5s PRINT"C D C O P Y" 

40 LOCATE 8,10:PRINT"C P C" 

50 LOCATE 4,13:PRINT"6128 664 464" 

60 LOCATE 9,17:PRINT"von" 

70 LOCATE 3,21:PRINT"OTTO HUBENSCHMID" 

80 FOR n=l TO 3000:a*=INKEY*:IF a*="" TH 
EN NEXT n 
90 ' 
lOO ' 


auf die Diskettenhülle zu 
schauen braucht. 

Natürlich braucht man dazu 
einen Drucker. Die Steuer¬ 
codes und die Texthardcopy 
(Zeilen 250 bis 360) sind auf 
den NLQ 401 abgestimmt. 
Epson-kompatible Drucker 
dürften den Dienst aber 
auch nicht verweigern. Der 
Rest des Programmes er¬ 
klärt sich aus den REM- und 
PRINT-Anweisungen. 

Otto Hubenschmid 


110 'Erklaerung 

120 MODE 2:CLSsBORDER 26:LOCATE 1,2:PRIN 
T"CDCOPY"sLOCATE 1,5 

130 PRINT"gibt das Inhaltsverzeichnis ei 
ner Diskette auf dem Drucker aus," 

140 PRINT"entweder mit 'cat' oder mit 'J 
dir'." 

150 LOCATE 15,8s PRINT"C Auswahl nachher 
mit (C) oder (D) 1 . "sLOCATE 1,12 

160 PRINT"'cat' bedeutet sortierter Aus 
druck mit Groessenangabe jeder Datei." 
170 LOCATE 1,16 

180 PRINT"'.'dir' bedeutet unsortierter A 
usdruck ohne Groessenangabe." 

190 LOCATE 15,24 

200 PRINT CHR*(24);" Drucker einschalten 
und eine Taste druecken! ";CHR*(24) 

210 CALL &BB06 
220 ' 

230 ' 

240 'Texthardcopy - Vorbereitung 

250 PRINT#8,CHR*(27);CHR*(73);CHR*(1);CH 

R*(27);CHR*(55);CHR*(15); 

260 PRINT#8,CHR*(27>;CHR*(51);CHR*(13) ;C 
HR*(27);CHR*(83);CHR*(O)5 
270 MEMORY 8<A100-1 

280 FOR i=—24320 TO -24222sREAD byte:POK 
E i,byte:s=s+byte:NEXT 

290 DATA &cd,&78,&bb,&22,&64,&a1,&cd,&11 

,&bc,&17,&32,&63,&a1,&21,8(01,8(01 

300 DATA &22, 8(66, &a 1, &3a, 8(63, &a 1 , 8<47,8<0e 

,&14,&c5,&e5,&cd,8(75,&bb,8<e1,&cd 

310 DATA 8(60,&bb,&c1,8(38,8(02,&3e,&20,&cd 

, &58, &a 1, &e5, &c5, &3e, &42, &cd , 8« 1 e 

320 DATA 8<bb , &c 1, &e 1 , 8(20, & 1 c , &24, &0d , &20 

, &eO, & 10, &dc , &3e, 8<0d , 8<cd , &58,8<a 1 

330 DATA &3e, &0a, 8<cd , 8<58, &a 1, 8<2a, &66, &a 1 

, &2c , 8<22, &66, &a 1, &7d , 8<f e, & 1 a, 8<20 

340 DATA &c2,8<2a, &64 , &a 1 , &cd , &75,8<bb , &c9 

, &c5, &cd , &2e, 8<bd , 8(38,8<f b , 8(Cd , 8<31 

350 DATA 8(bd,8(Cl ,8<c9 

360 IF s<>11873 THEN MODE 2:CLS:PRINT"Fe 
hier in Datazei1en":END 
370 ' 

380 ' 

390 'Eingaben 

400 MODE 2 s CLS:BORDER 26:PRINT"O.K." 

410 LOCATE 1,5:PRINT"Diskette einlegen!" 
420 LOCATE 1,10:LINE INPUT"Disketten-Bez 
. eingeben s ",bez$ 

430 LOCATE 1,14s LINE INPUT"Diskettenseit 
e eingeben s ",seite* 

440 bez*=LEFT*(bez*,20):seite*=UPPER*(LE 
FT*(seite*,1)) 

450 LOCATE 1,20s PRINT"(C)ATCOPY oder (D) 
IRCOPY ?" 

460 a*=INKEY*sIF a*="" THEN 460 

470 wah1*=UPPER*(a*)sIF wahl*<>"C" AND w 

ahl*< >"D" THEN 460 

480 GOSUB 620 

490 ' 

500 ' 

510 'weitere CDCOPIES 

520 WIND0W#3,65,80,1,25:PAPER#3,O:PEN#3, 

1:CLS#3 

530 L0CATE#3,1,7:PRINT#3,"Weitere":PRINT 
#3,"Diskette (J)" 

540 L0CATE#3,1,11:PRINT#3,"Beenden (B)" 

550 a*=INKEY*:IF a*="" THEN 550 

560 was*=UPPER*(a*):IF was*="J" THEN PAP 

ER 1:PEN 0:GOTO 400 

570 IF was*="B" THEN MODE 2:END 

580 GOTO 550 

590 ' 

600 ' 

610 'Unterroutine CDCOPY 

620 MODE 2: BORDER O: PAPER O.-PEN 1 

630 PRINT STRING*(61,"—"):PRINT#8,STRING 
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*< 61 ,"-"> 

640 WIND0W#2,3,60,1,25:PAPER#2,0:PEN#2,1 
:CLS#2:CLS 

650 WINDOW SWAP 0,2:IF wahl*="C" THEN CA 

T ELSE !DIR 

660 WINDOW SWAP 2,0 

670 FOR y=l TO 25:L0CATE 1,y:PRINT"LO 

CATE 61,y:PRINT"i":NEXT y 

680 LOCATE 1,25:PRINT STRING*<61,"-") 

690 LOCATE 1B,23:PRINT STRING*<44L 
OCATE 18,24:PRINT"!"SPC<1>bez*; 

700 IF wähl*="C" THEN PRINT TAB<44);"C A 
T“; ELSE PRINT TAB<44);"D I R"; 

710 PRINT TAB<53);"Seite ";seite* 

720 CALL &A100:RETURN 
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CDCOPY1 

CDCOPY2 

CDCOPY3 

.BAS 

:I81 
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SK 

3K 
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Verbesserte 

TRACE-Funktion 


Die Verwendung der TRACE-Funktion des CPC-BASIC füllt 
den Bildschirm sehr schnell mit Zeilennummern, von einem 
geplanten Bildaufbau bleibt nicht mehr viel übrig. Hier sind 
zwei Maschinenprogramme, die dies ändern (CPC 464). 


Das erste Maschinenpro¬ 
gramm verändert die 
TRACE-Funktion so, daß die 
Zeilennummern immer ins 
Window #7 ausgegeben 
werden. Durch geeignete 
Wahl der Window-Größe 
und entsprechende Positio¬ 
nierung auf dem Bildschirm 
kann eine Störung des Bild- 
aufbaus weitgehend verhin¬ 
dert werden. 

Listing 1 zeigt den BASIC- 
Loader für das Maschinen¬ 
programm. Er bringt das 
Maschinenprogramm unter¬ 
halb von HIMEN in den 
Speicher, setzt HIMEN ent¬ 


sprechend herab und ver¬ 
bindet das Maschinenpro¬ 
gramm mit dem BASIC- 
Interpreter. 

Wenn die drei unterstriche¬ 
nen Null-Bytes in Zeile 1080 
durch CD,18,BB ersetzt wer¬ 
den, wartet das Maschinen¬ 
programm nach der Aus¬ 
gabe jeder Zeilennummer 
auf einen Tastendruck. Erst 
nach dem Drücken einer be¬ 
liebigen Taste (außer der 
ESC-Taste) läuft das Pro¬ 
gramm weiter. Auf diese 
Weise wird eine Einzel¬ 
schritt-Funktion realisiert. 


Listing 2 zeigt den BASIC- 
Loader für das zweite Ma¬ 
schinenprogramm. Auch 
hier erfolgt die Ausgabe ins 
Window #7. Es wird jedoch 
nicht nur die Zeilennummer 
ausgegeben, sondern die 
gesamte BASIC-Zeile. Das 
Listing läuft sozusagen auf 
dem Bildschirm mit. 

Wenn die drei unterstriche¬ 
nen Null-Bytes in Zeile 1080 


durch CD,18,BB ersetzt wer¬ 
den, wartet auch dieses Ma¬ 
schinenprogramm nach der 
Ausgabe einer BASIC-Zeile 
auf einen Tastendruck. Erst 
nach dem Drücken einer be¬ 
liebigen Taste (außer ESC) 
läuft das Programm weiter. 
Auf diese Weise läßt sich 
auch hier eine Einzelschritt- 
Funktion realisieren. 

Gerd Kluge 


10 REM Listing 1 

20 REM CPC 464: Verbesserte Trac 
e—Funktion 

30 REM (Zeilennummern in Window 
#7) 

40 ) 

100 MEMORY HIMEM-100:init=HIMEM+ 
1 

110 start=HIMEM+13:summe=0 
120 FOR adr=init TO init+99 
130 READ b*:byte=VAL( ,, & ,, +b$> 

140 POKE adr,byte:summe=summe+by 
te 

150 NEXT adr 

160 IF summe<>12819 


THEN PRINT " 

DATA-Fehler!":STOP 

170 hi=INT(start/256):lo=start-2 

56*hi 

180 POKE init+1,losPOKE init+2,h 
i 

190 CALL init 

1000 DATA 21,00,00,3E,C3,22,5B,B 

B, 32,5A 

1010 DATA BB,C9,F5,DD,E1,E3,3E,C 
3,BC,20 

1020 DATA 03,3E,74,BD,E3,20,17,E 
5,D5,21 

1030 DATA 00,00,39,11,10,00,19,7 
E,FE,A6 

1040 DATA 20,04,23,7E,FE,DD,Dl,2 
8,07,El 

1050 DATA DD,E5,F1,CF,00,94,3A,O 

C, B2,F5 

1060 DATA 3E,07,CD,B4,BB,3E,5B,C 

D, 56,C3 

1070 DATA 2A,36,AE,7E,23,66,6F,C 
D,79,EE 

1080 DATA 3E,5D,CD,56,C3,00,OO,O 
O,Fl,CD 

1090 DATA B4,BB,E1,F1,F1,F1,F1,F 
1,Fl,C9 
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Formatieren 
unter BASIC 


10 REM Listinq 2 

20 REM CPC 464: Verbesserte Trac 
e-Funktion 

30 REM (Basic—Zeilen in Window # 
7) 

40 REM 

100 MEMORY HIMEM-99:init=HIMEM+l 
110 start=HIMEM+13:sLimme=0 
120 FOR adr=init TO init+98 
130 READ b*:byte=VAL( , *&"+b$> 

140 POKE adr,byte:summe=summe+by 
te 

150 NEXT adr 

160 IF summe<>12817 


THEN PRINT " 

DATA-Fehler!":STOP 

170 hi=INT(start/256):lo=start-2 

56*hi 

180 POKE init+1,lo:POKE init+2,h 
i 

190 CALL init 

1000 DATA 21,00,00,3E.C3,22,5B,B 

B, 32,5A 

1010 DATA BB,C9,F5,DD,E1,E3,3E.C 
3,BC,20 

1020 DATA 03,3E.74,BD,E3,20,17,E 
5,D5,21 

1030 DATA 00,00,39,11,10,00,19,7 
E,FE,A6 

1040 DATA 20,04,23,7E,FE,DD,Dl,2 
8,07,El 

1050 DATA DD,E5,F1,CF,00,94,3A,O 

C, B2,F5 

1060 DATA 3E,07,CD,B4,BB,CD,4E,C 
3,2A,36 

1070 DATA AE,2B,2B,CD,63,E1,CD,4 
5,El,23 

1080 DATA 7E,B7,20,F8,00,00,00,F 
1,CD,B4 

1090 DATA BB,El,Fl,Fl,Fl,Fl,Fl,F 
1 ,C9 




Listing 2 


Dieses Programm für den Schneider CPC 464 ermöglicht es, 
eine Diskette unter BASIC zu formatieren. Bisher gab es 
diese Möglichkeit nur unter CPM, obwohl die Routinen dafür 
Im ROM schon vorgesehen sind. Andreas Müller 


IO ' •*** Formatierung unter BASIC 
40 MÜDE 1 

50 INK 0,14:1NK 1,0:INK 2,3:INK 3,14,3:B 
ORDER 14 

60 SPEED INK 20,30 

70 WINDOW#1,1,40,1,4:PAPER#1,2:PEN#1,0 x C 
LS#1 

80 WIND0W#0,1,40,6,25 
90 ' 

100 PRINT#1:PRINT#1,TAB(16)"FASTFORMAT" 
110 PEN 1 

120 PRINT"Bitte eine Diskette einlegen" 
130 PRINT"und mit M ::PEN 2:PRINT"CENTER! 

";:PEN 1:PRINT"bestaetigen..." 

140 WHILE INKEY*< >CHR*(13):WEND 

150 CLS 

170 GOSUB 400 

190 LQCATE 1,7:PRINT"System-Format 
( 1 ) " 

200 LOCATE 1,9:PRINT"Data-Only—Format 
( 2 ) " 

210 LOCATE 7,19:PEN 3:PRINT"Ihre Wahl: " 

220 a*=INKEY*:IF a*="" THEN 220 

230 IF a*="l" THEN y=&41:ze=7 

240 IF a*="2" THEN y=&Cl:ze=9 ELSE IF at 

<>"1" AND a*<>"2" THEN 220 

260 LOCATE 7,19:PRINT STRING*(10,32) 

270 ad=&8035 

280 FOR a=l TO 9 

290 POKE ad,0:POKE ad+l,0:P0KE ad+2,y:P0 
KE ad+3,2 
300 ad=ad+4 

310 y=y+2:IF (y AND 15)=11 THEN y=y-9 
320 NEXT 

340 LOCATE 25,ze:PRINT CHR*(242)+CHR*(15 
4) 

350 CALL &8000 

370 LOCATE 7,19:PRINT "Noch eine Diskett 
e formatieren (j/n)" 

380 CALL &BB06:IF INKEY(45)=0 THEN RUN E 
LSE CALL 0 

400 DATA 8(3E,*(00,8(32,8(2F,S(80,&3A,S<2F,8(80 
,&57,&3A, 665 

410 DATA &30, &B0, &5F, &3A, 8<31, &80, &4F, &21 
,&35,&80, 799 

420 DATA &DF, &32, &B0, &3A, &2F, &80, JkFE, &27 
,&C8,&3C, 1187 

430 DATA &32, &2F, 8t80, &21, &35, &80,8<06, &09 
,&77,&23, 608 

440 DATA &23, &23, SS<23, &10, &F9, & 18, &D6, &27 

,&00,8<41, 712 

450 DATA &52,&C6,S<07, 287 

460 dat=0:sz=0:dz=400 

470 FOR adr=&8000 TO &8034 

480 READ byte:dat=dat+l 

490 sz=sz+byte 

500 POKE adr,byte 

510 IF dat < 10 AND adr < &8034 THEN 
550 

520 READ chksum 

530 IF chksumOsz THEN PRINT "Fehler i 

n Zeile :":dz 

540 dz=dz+10:sz=0:dat=0 

550 NEXT adr 

560 RETURN 
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Tip des Monats 
Mntev^Spooler 

Das Programm wird vom Desktop aus gestartet. Danach lau¬ 
fen alle Druckerausgaben über den Spooler. Schon nach 
wenigen Sekunden meldet sich der Computer zurück, wäh¬ 
rend der Drucker weiterarbeitet (Atari ST). 


Das BASIC-Programm er¬ 
zeugt die Datei ,,SPOO¬ 
LER.PRG“, die das Maschi¬ 
nenprogramm des Drucker¬ 
spoolers enthält. Man muß 
dazu die Größe des Druk- 
kerpuffers in KB eingeben. 
Ferner fragt das Programm, 
ob die Druckeranpassung 
benötigt wird. Beim Ge¬ 
brauch des Spoolers mit 
Ist-Word ist dies nicht der 
Fall, da Ist-Word eine ei¬ 
gene Druckeranpassung 
besitzt. Das erzeugte Pro¬ 
gramm ,,SPOOLER. PRG“ 
kann durch Doppelklick vom 
Desktop gestartet werden. 
Danach laufen alle Drucker¬ 
ausgaben über den Spoo¬ 
ler. Beim Ausgeben von 
Texten meldet der Computer 
sich schon nach wenigen 
Sekunden zurück, während 
der Drucker weiterarbeitet. 
Um den Spooler nach dem 
Laden des Betriebssystems 
automatisch zu initialisie¬ 
ren, kann auf der TOS-Dis- 
kette ein ,,AUTO“-Ordner 
angelegt und ,.SPOO¬ 
LER.PRG“ dort hineinko¬ 
piert werden. 

Der Spooler besitzt eine 
Druckeranpassung für den 
Drucker FX-80, so daß sich 
jetzt auch die deutschen 
Umlaute und das ,,B“ druk- 
ken lassen. Die Druckeran¬ 
passungstabelle (Zeilen 600 
bis 650 im BASIC-Pro¬ 
gramm) läßt sich auch für je¬ 
den anderen Drucker än¬ 
dern. Bei Matrixdruckern ist 
es sogar möglich, fehlende 
Zeichen mit Hilfe von Grafik 
darzustellen. Die Tabelle ist 


folgendermaßen aufgebaut: 

1. Byte: ASCII-Code im 

Atari 

2. Byte: Anzahl der zum 

Drucker zu sen¬ 
denden Codes 
3-n. Byte:Zum Drucker zu 
sendende Co¬ 
des, durch die 
der Atari-ASCII- 
Code ersetzt 
wird 

n + 1. Byte:ASCII-Code im 
Atari oder 0 
(Tabellenende) 
n+2. Byte:Anzahl der zum 
Drucker ... 

Beispiel: 

142,4,27,82,2,91,153,4,27,82 

,2,92,0 

Diese kleine Tabelle ersetzt 
den Code 142(Ä) durch die 
vier Byte 27,82,2 (bei Epson 
FX-80 deutscher Zeichen¬ 
satz) und 91 und den Code 
153(ö) durch die vier Byte 
27,82,2 und 92. 

Die Programmlänge des 
Maschinenprogramms steht 
in Zeile 250 im fünften und 
sechsten Data-Byte 

(2*256 + 100 = 612 Byte). 
Wenn die Druckeranpas¬ 
sungstabelle verlängert 
wird, muß die Programm¬ 
länge um die Anzahl der 
neuen Byte erhöht werden. 
Da die Anzahl der Byte, um 
die die Tabelle verlängert 
wird, nicht ungerade sein 
darf, muß man die Tabelle in 
diesem Fall anstatt mit ei¬ 
nem mit zwei Nullbyte ab¬ 
schließen. Nach Änderun¬ 
gen in den Datas sollte 
übrigens Zeile 230 gelöscht 
werden. Mark-Oliver Stehr 


100 print"Spooler mit Druckeranpassung 
Vs.1.0 (c)1986 by M.O.Stehr" 

110 r=l:s=0:open "R",#i,"SPOOLER.PRG", 
16:field #1,16 as a$ 

120 b$=" " s-f or i=0 to 15:read a:s=s+a:g 

osub 140: b$=b:£+chr $ (a) : nex t 
130 1set a$=b$:put #1,r:r=r+l:goto 120 

140 i-f a<256 then return 
150 on a-255 goto 160,1B0,190,220 
160 input" -> Groesse des Druckerpu-f-f e 
rs in kb :",size 

170 c=size*1024:a=int(c/65536):b=int(( 

c~a*65536)/256)sreturn 
180 a=b:return 

190 input" -> Mit Druckeranpassung (j/ 
n) ";d$ 

200 a=l:if d$=v'>n" then a=0 


210 return 

220 lset a$=b$:put #1,r:close #1 

230 i-f s< >42124 then print. "Fehl er in D 
atas !" 

240 end 

250 DATA 96,26,0,0,2,100,0,0,0,0,0,0,0 

, 0 , 0,0 

260 DATA 0,0,0,0,0,0,0,0,0,0,0,0,47,60 

, 0,0 

270 DATA 0,138,63,60,0,45,63', 60,0,5,78 
,77,80/143,35, 192 

280 DATA 0,0,0,174,47,60,0,0,1,124,66, 
103,63,60,0,13 

290 DATA 78,78,80,143,65,249,0,0,2,2,7 
4,24,103,0,0,10 

300 DATA 66,128,16,24,209,192,96,242,3 
5,200,0,0,1,232,35,200 

310 DATA 0,0,1,244,35,200,0,0,1,240,66 
,185,0,0,1,248 

320 DATA 209,249,0,0,1,252,84,136,35,2 
00,0,0,1,236,44,111 

330 DATA 0,4,32,60,0,0,1,0,208,174,0,1 
2,208,174,0,20 

340 DATA 208,-174,0,28,208,185,0,0,1,25 
2,84,128,66,103,47,0 

350 DATA 63,60,0,49,78,65,34,79,48,17, 
8,0,0,13,102,0 

360 DATA 0,4,78,105,12,105,0,3,0,6,103 
,0,0,18,12,105 

370 DATA 0,8,0,6,103,0,0,178,78,249,25 
5,255,255,255,74,105 

380 DATA 0,8,102,244,20,41,0,11,74,120 
,4,238,103,0,0,62 

390 DATA 74,121,0,0,2,0,103,0,0,52,65, 
249,0,0,2,2 

400 DATA 16,24,103,0,0,40,180,0,103,0, 
0,10,66,128,16,24 , 

410 DATA 209,192,96,236,16,24,20,24,72 
,231,128,128,97,0,0,20 

420 DATA 76,223,1,1,83,0,102,238,112,2 
55,78,115,97,0,0,4 

430 DATA 78,115,32,57,0,0,1,252,176,18 
5,0,0,1,248,103,242 

440 DATA 74,185,0,0,1,248,102,0,0,24,8 
,57,0,0,0,255 

450 DATA 250,1,102,0,0,12,16,2,97,0,0, 
146,112,255,78,117 

460 DATA 32,121,0,0,1,244,16,194,82,18 
5,0,0,1,248,177,249 

470 DATA 0,0,1,236,102,0,0,8,32,121,0, 
0,1,232,35,200 

480 DATA 0,0,1,244,112,255,78,117,74,1 
05,0,8,102,0,255,74 

490 DATA 32,57,0,0,1,252,176,185,0,0,1 
,248,103,0,0,6 

500 DATA 112,255,78,115,66,128,78,115, 
72,231,128,128,74,185,0,0 

510 DATA 1,248,103,0,0,42,83,185,0,0,1 
,248,32,121,0,0 

520 DATA 1,240,16,24,177,249,0,0,1,236 
,102,0,0,8,32,121 

530 DATA 0,0,1,232,35,200,0,0,1,240,97 
,0,0,16,76,223 

540 DATA 1,1,19,252,0,254,0,255,250,17 
,78,115,65,249,0,255 

550 DATA 136,0,16,188,0,15,17,64,0,2,1 
6,188,0,14,16,16 

560 DATA 8,128,0,5,17,64,0,2,8,192,0,5 
,17,64,0,2 

570 DATA 78,117,0,0,0,0,0,0,0,0,0,0,0, 

0 , 0,0 

580 DATA 0,0,0,0,0,0,0,0,0,256,257,0,0 

,258 

590 REM Hier beginnt die Tabelle zur D 
ruckeranpassung 

600 DATA 64,4,27,82,0,64,91,4,27,82,0, 
91,92,4,27,82,0,92 

610 DATA 93,4,27,82,0,93,123,4,27,82,0 
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,123,124,4,27,82 

620 DATA 0,124,125,4,27,82,0,125,126,4 
,27,82,0,126,221,4 

630 DATA 27,82,2,64,142,4,27,82,2,91,1 
53,4,27,82,2,92 

640 DATA 154,4,27,82,2,93,132,4,27,82, 
2,123,148,4,27,82 

650 DATA 2,124,129,4,27,82,2,125,158,4 
,27,82,2,126,0 

660 REM Tabellenende 

670 DATA 0,0,0,0,2,18,6,16,20,6,6,6,6, 
8,28,76,10 

680 DATA 56,6,8,32,8,6,10,6,18,6,22,10 

,6,8,10,6 

690 DATA 0,259 

BAS/C-Listing zum Printer-Spooler 


METACOMCO ASSEMBLER V1B.203 
LOG OBJECT 


Bpoolar rtlt Druck«r«npaitung V». 1.0 
BOURCE STATEMENT 


IIS 1 , 


0000 ' 
8883 ; 

iifi 

0018' 


ilii 


00BA 


0028' 
8816 
8812 : 


8888 ' 
8885 ; 
1»! 
ÜIi: 
0062* 
8828- 
88 ?! ; 

"W- 

80' 

__B2' 

888s 

008A ' 

8885- 
88 ?? ; 
8 818-' 


0000 0BAE 
0000 017C 
000D 


41F9 0000 001A 

SH 

m 

ff Mi 

Sil? 

23C8 0000 0004 
2C6F 0004 

8825 8885 B1BB 
8821 8S1S 

D0B9 0000 0014 
JFJC 0031 


flll ISIS 

IIII 88,2 0866 

im fii? 

:SS F r F F F F äü 



-04EE 

§§ii 

P 

8858- 

00C4 ’ 

£918 

4 A79 



2039 0000 0014 
|jS£9 0000 0010 

-- 00l0 


00FF FA01 


H51 

2079 0000 0.0C 
32B9 0000 0010 

115? 8888 BBB * 


II 


88 SSSS 


kmmp 

■ f p?nt 


(c)1986 by M.O.8tahr 

53S 


• qu 

• qu 


IS 


blo» 

bcofltat 

bconout 

■•taxac 

1 n 11 


■ qu 13 

• qu 8 

• qu 3 

• qu 8 

no 

ata 

trip"#bläi 
mova*. \ dl’, ö^dbloa + 2 
iovt.1 #prnlnt,-(*p) 
noviTn tn?pint,-<ap> 

i53$.? H S?r:p 


move.l #nawb1oa.- (ap ) 
aova.« •48. - <«p > 
novt.H •••t»K«cr<>p) 


■ lp 


:3s:i b d 1 * Bl * ,dB 


38 d."d 

i*!e* 

ivrnwK 

».i ii,pout 


t«r t 


bra «lp 
hov«.1 

MOV*.1 

fflOV«. 1 _ 

clr.l chtrcountar 

■ddq.l*#|T«0 

v«.1 «0,p«nd 


HOV* 
MOV».1 

aov«.1 
add. 


mos 6 


ZSSTi iZfZSi,< 

idd.-f 2 2 !, ( ;!, , ’c- 

aovt.l d0,~(»p) 

f ava.w #keap,-(ap) 
rap agandoi 


• Buay-Int»rruptroutln* 

• Interrupt fraigaban 

• Puf f aratart-Tabal lananda+1 

• ... «Iso Tabellenanda aucnan 


* pi n«»pout»Puf f aratart 

* kain« auazugabtndan Zalchan 

* Puffaranda barachnan 

* P ba3a**"--" nfl * " 


96 naNbloa 


trap 

«ovt 


tgaad 
1 »p,al 


'•.1 Ul 
J.W #b 
\ nawbi 

#b 


dB 


63 oldbioa 

67 af p 

68 afp_larb 

70 duapflg 

72 * Naua Druckar 

74 nawbconout 


bna 

hov«. 1 uap.al 
cnp.tt »bconout ,6(«1) 
baq — -*■ 

baf 

J«l 


♦ tan? aactlon 

♦ data aactlon 
baa aactlon 

♦ Puffar-Broaaaa 


• nicht banutstan 8palchar 

• wieder fralgaban 

* Suparviaar-Btack 

* Bai Aufruf voa Uaar-Modua, 


conout 

.. jcoatat, 6 <«l) 
n«|wbcoat at 


• Uaar-8tack banutzan 

* Zalch- r 


— - _-k bani 

ichanauagaba 

• Statuaabfraga 


aqu «fffaBl 
•qu afp+16 

•qu *4aa 

Routinan fuar Zalchanauagaba 

.J.tl«!».« 


ol 

HOV«.b 

tat.« duai 
bag tabanc 
tat.*« convart 


flg 

_ _rt 

baq taband. 
laa charactara. 

- d2 

!4* ,dB 


4A69 eaes 


, p , nd 


conc 


M 1,8 

ft/ 


24 nawbcoatat 


crap.b d0,d2 

Iw.? - »* 

bra aaarch 
Hovt.b (a0)+,d0 
Hova.b (a0)+jdz 
aovan.1 d0/a0,-(ap> 

bar bconoutz 

:ss??t 1 .U8i + ’ dB/ * B 

8Sv.q p i-i,de 

rta 

bar bconout2 
rta 


aova 

5* E 


* Multi Function Parigharal 

* Interrupt In - Barvlca Ragiatar 

und 8tatuiaabfraga 

* Druckar 7 

* nein --> 

* auazugabandas Zalchan 

* Bai Hardcopy keine Umwandlung ! 

* Umwandlung 7 

* 9”atalla > fuar Druckaranpaaaung 

* Zalchan auchan ... 


und durch dB Byte 

au* dar Tabelle • 


• Zalchan in d2 -> Puffer 


1 cfcarcountar «dB 

S:irU’.rc OU nt.r 

KSi-— 

iva.b d2«d 


btat 
bna ___ 
aova.b d2«d0 
bar charout 

q #-l«dB 


aova 

rta 


* Puffer voll 7 

* JL*< ***rtan 

* Puffar laar 7 

* nein --> 

* buay 7 

* Ja -> 

* nalm Zalchan 


■> Druckar 



aova.1 
apvaq 
rta 


tat.H 8(a1) 


patart, 


• Zalchan -> Puffar 

• Puffaranda erreicht 7 

• nein —> 

• Jai pln ■ Puffaratart 


* Druckar 7 
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Scan: S. Höltgen 


ffi fff! Sf««» 


«I 

iw 

|||1 

\m 


8‘82 

ms 


48E7 8080 

29SS 885? BB,B 
flfl SSSS SSi§ 
ilsi 5111 1,004 

i||I Pf! *» 

Al " 


E 00FF FA11 


-88FF88e0 




• Druck« 
prnint 


bn« oldbloa 
MOV9.1 >iX«l «dB 
cmp.l cn«rcount*r,d0 
b«q 12 

nov«q 4-1,d0 

clr.l d8 
rt« 

r-Int«rrupt-Routin* 

■ovm. 1 d0/«0,-(«p> 
t»t.l ch«rcount«r 
b«q 14 

subq.l tl,ch«rcount«r 

«OV« • 1 pO^t,«0 

d8 


«ovv.l pout.aB 
«ov«.b («0)+,d 
6K . i3 P.nd,.< 

«ovv.l patart,av 
«ov«.1 a0,pauc 
b*r charquc 
«ov««. 1 <«p > + ,d0/*0 

«ov«. b exiinine,»fp_i« 
rt« 


soundgvn 

charout 


«qu 4f f 8800 

i3S.;E u llin*t? 

«ov«.b dB.2(«0 
«ov«.b #14,' 
■ovv.b (a 
bclr #3. 


8.2<«0) 
• 14, («0> 
«0?,d0 
ocir wQ,d0 

sssrfcjSk*'* 0 ’ 

«ovv.b d0,2(«0> 


patart 

P vnd 
? ut 

charcount 

vlz« 

cony«rt 


«OV( 

rt« 
data 

da. 1 1 

d«. 1 1 

d dV.\ i 

dB. 1 1 


Fla 


* n«In—> 

* Puff VT 

• ja —> 

• nvlm noch Platz 


de.1 ^0*1024 

..-fl BOlft« bvln Bvbrauch mit 
-Mord bvrvitV «ln« «ingvbaut« 

1._ .2,. 3s_ 4._ 3. 6. Byt« 


1« Puf f«r 


* Noch Z«ich«n 1« Puff«r 7 

* n«in —> 

: tein&re*3&" r 

* Puf f «r«nd« «rr«icht 7 

* n«in —> 

* Jai pout - Puff«rstart 

* Ausgab« an Druckvr 

* bit e 1o«sch«n (8EX-Hodus) 

* 8oundchip mit Ports 

* Z«ich*n -> Port B 


• 8trab« «rz«ug«n 


* Puff«rstartadr«ss« 


: %• 
Ist-Word ( 
Druckaranp 


: tJwfewifs!:" 

* Anzahl d«r Z«lch«n 1« Puff«r 

ro«BB« d«s Puff«r■ (1n Byt«s> 

I - k«In« Cod«umwand1ung 
auf 0 gpsvtzt w«rd«n, 
asaung bvsltrt. 


?■::! i 
■S-.t J •}•»•. 


■iS 

Sl-.S } 

dc.b ' * ; h . s: 


• Tab«l1« zur Druckar-AnpatBung 

: 

* 3.-n.Byt«i Zum Druckvr zu 

s«nd«nd« Byt*« 

EP80N FX-801 


Atari-A8CII-Cod« 
Anzahl d«r zun Druck« 
---—i Byt«a 


* Hi 

1 


ll-l :. , 4’P'.|i 

dc.b e 


?5 


* 27,82,2 - d«ut«ch«r Z«ich«nsatz 

* DiTabvll« kann J« nach^ 

* uruck«r beliebig vara«na«rt 

* bzw. «rw«it«rt w«rd«n 


No «rrors found in thl« Aaavmbly 

Assemb/er-Listing zum Printer-Spooler 


Easy-DATA 

i 

Beim Verfassen eigener Programme und beim Abtippen von 
Listings ist es oft nötig, eine riesige Menge von in DATA- 
Zeiien stehenden Werten in den Computer einzugeben. Die¬ 
ses Programm vereinfacht die Sache erheblich und hilft so¬ 
mit auch Zeit sparen (Atari XL). 


Man gibt am Anfang die Zei¬ 
lennummer ein, an der die 
erste DATA-Zeile stehen 
soll, und den gewünschten 
Zeilenabstand. Eine weitere 
Erleichterung besteht in der 
Umfunktionierung der Leer¬ 
taste. Bei Gebrauch von Au¬ 
tokomma genügt es statt der 
Kommataste, die so hinter¬ 
hältig neben dem Punkt 
liegt, auf die Leertaste zu 
drücken. Die fehlenden 
Kommas werden automa¬ 
tisch eingesetzt. Gleichzei¬ 
tig wird jedes O, das sich in 
die Zahlenreihe geschmug¬ 
gelt hat, wieder in eine Over¬ 
wandelt. Die eingetippte 
Zeile wird unter der näch-, 
sten angezeigt. Entdeckt 
man dann einen Fehler, 
drückt man zur Return¬ 
gleichzeitig die Option-Ta¬ 
ste. Die Zeile kann dann kor¬ 
rigiert werden, bevor es wei¬ 


ter geht. Nach Beendigung 
der Eingaben drückt man 
bei der folgenden Zeile 
(ohne Eingabe) RETURN. 
Es besteht dann die Mög¬ 
lichkeit, das Programm zu 
löschen, so daß nur noch 
die DATA-Zeilen im Spei¬ 
cher sind. Achtung vor zu 
langen Eingaben. Sie füh¬ 
ren nicht zum Abbruch des 
Programms, aber die über¬ 
schüssigen Zahlen werden 
nicht berücksichtigt und 
fehlen am Schluß. 

Mit POKE 731, 255 (Nor¬ 
malwert 0) kann man nun 
das, manchem lästige, Ta¬ 
staturklicken ausschalten. 
Der Warnton vor einer zu la¬ 
gen Zeile ertönt trotzdem 
noch. Hinweis: Die Pfeile im 
Listing entstehen durch 
ESC/Control und < bezie¬ 
hungsweise =. 

Stefan Neumann 


NY 1 DIM D $(1503 ,K$ (1) 

WB 2 ? CHR$ (12 53 

DO 3 ? s? "Erste Zeilennunner";:INPUT z 
DU 4 IF Z<49 THEN ? "BELEGT" : FOR WS = 1 TO 
500:NEKT WS:GOTO 2 
OY 5 ? :? "Zeilenabstand";:IHPUT d 

RN 6 Z-Z-d 

EW 7 ? :? "AutokOHHa CJ/N3INPUT K$ 

WH 8 ? CHR$ (1253 

RE 9 Z=Z+Ö 

KO 10 POSITION 2,4 

IZ 11 7 Zj" DATO ";:INPUT D$:LD-LEN(D$3 

SO 12 IF D$ = "" AND PEEK (532793 <>3 THEN 30 
LY 13 IF K$="J" AND PEEK (532793 <>3 THEN 2 
3 

KP 14 IF PEEK (532793=3 THEN GOTO 29 
OL 15 POSITION 2,21:? Zj" DATA ";D$ 

LH 16 ? "CONT";POSITION 2,18 

HW 17 POKE 842,13 

ZF 18 END 

HM 19 POKE 842,12 

KM 20 ? CHR$ (1253 

IG 21 POSITION 2,9:? Zj" DATA ";D$ 

BU 22 GOTO 9 

KR 23 FOR 0=1 TO LD 

BJ 24 IF D$ (Q,03 =" " THEN D$(0,Q3="," 

JL 25 IF D$(Q,Q3="0" THEN D$(Q>Q3="0" 

LW 26 NEKT O 

IB 27 IF D$ (LD,LD3 = "," THEN D$(LD,LD3=" " 
TN 28 GOTO 14 
KP 29 Z = Z —A:GOTO 10 
KN 30 ? CHR$(1253 

WU 31 ? :? "Soll >EINGABEHILFE< geloescht 

werden" 

CJ 32 ? :? "CJ/Nl "J:INPUT K$ 
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IO 

33 

IF K$="J" THEN 35 

TM 

34 

GRAPHICS 0:END 

ZE 

35 

? :? "Soll wirklich geloescht werde 


n 

CJ/Nl";:INPUT K$ 

LC 

36 

IF K$="J" THEN 38 

UE 

37 

GOTO 34 

PF 

38 

FOR T=0 TO 37 

VD 

39 

? "IS4-" : LIST T 

ML 

40 

? TS? "CONT" 

UL 

41 

POSITION 0,0 

ZP 

42 

POKE 842,13:END 

HD 

43 

POKE 842,12 

MV 

44 

NEXT T 

JV 

45 

? "IS4" 

ET 

46 

FOR T=38 TO 48:? T:NEXT T 

DB 

47 

? "POKE 842,12:L." 

HS 

48 

POSITION 8,8:POKE 842,13:END 


REM-Killer 


Löscht selbständig alle reinen Kommentar- und Programm¬ 
zeilen, die mit dem REM-Statement beginnen. Ober- und 
Untergrenze für den Löschvorgang sind programmierbar 
(Atari XL). 


Das Programm wird in toke- 
nisierter Form untersucht. 
Ist das erste Token einer 
Zeile eine Null (REM), wird 
eine Prozedur aufgerufen, 


die die Zeile löscht. 

Aufruf des Programms: 

GOTO KILL (Variable, die im 
Hauptprogramm vereinbart 
werden sollte). Georg Pohl 


RD 30 POKE 709,0:POKE 710,10:POKE 712,8 
UF 40 POKE 729,20:POKE 730,2:P0KE 752,1 
BJ> 50 KILL=32318:MAX=32767:REM SOLLTE 
VEREINBART SEIN ... 

TY 100 PRINT CHR$ (1253 

OP 105 FOR J = 2 TO 38 : PRINT "-";:NEXT J : PR 
INT 

OU 107 PRINT "REH KILLER-Benutzep-Hinviei s 
e ..." 

OY 108 FOR J=2 TO 38:PRINT "-"j:NEXT J:PR 
INT 

NY 109 POSITION 2,10 

QI 110 PRINT "ZUM starten des rem KILLER 
geben Sie" 

PU 120 print "GOTO KILL ein. Danach wird 
jede Pro-" 

HF 130 PRINT "graMM-Zeile geloescht, die 
Mit REM" 

SS 140 PRINT "beginnt ..." 

ZC 32290 END 

RU 32310 X=PEEK(1363+256*PEEK(1373 
MV 32320 L=PEEK(X3+256*PEEK(X + 13 
IB 32330 R=PEEK(X+43 
MU 32335 IF L> MAX THEN END 

JL 32340 IF R> 0 THEN X = X + PEEK(X + 23 :GOTO 3 
2320 

HF 32360 PRINT CHR$(1253 
FK 32370 POSITION 2,4:PRINT L 
YK 32380 PRINT "CONT" 

LS 32390 POSITION 2,0 
OH 32400 POKE 842,13:ST0P 
CW 32410 POKE 842,12 
AY 32420 GOTO 32320 
YK 32430 END 


Page-Lister 

Ermöglicht ein Auslisten nach Bildschirmseiten. Auf Wunsch 
kann ein LIST-Stopp bei jeder durch REM eingeleiteten Pro¬ 
grammzeile vereinbart werden (Atari XL). 


Beim Listen wird permanent 
die Speicherstelle ROWCRS 
(dez. 84) abgefragt. Erreicht 
sie Werte größer 20, wird das 
Listen bis auf Tastendruck 
unterbrochen. Der Bild¬ 
schirm wird gelöscht und ab 
der obersten Zeile weiterge- 
LISTet. 

Bei Zusatzvereinbarung 
(Stopp auch bei REM) wer¬ 
den auch die Tokens jedes 
Zeilenanfangs abgefragt. 
Wird hier eine Null gefunden 
(für REM), wird ebenfalls bis 
auf Tastendruck unterbro¬ 
chen. 


Aufruf des Programms: 

GOTO PAGE (Variable, die 
im Hauptprogramm verein¬ 
bart sein sollte). 
PAGE-LISTER selbst kann 
auf diese Weise geLISTet 
werden. Georg Pohl 


Wichtig: 

Bei Verwendung des Atari- 
Checksummers müssen alle 
Zeilennummern in den Pro¬ 
grammen „ REM-Killer“ und 
„Page-Lister“ unter 32 000 
liegen. 


PROGRAMMIER- U. EDITIER¬ 
HILFE PAGE-LISTER 

LISTET QUELL-TEXT NACH 
BILDSCHIRMSEITEN ORDER 
WAHLWEISE NACH REM-ZEILEN 
UND BILDSCHIRMSEITEN OHNE 
SCROLLING ... 


(C 3 GEORG POHL 
APRIL 1986 


-I 


QB 10 REM 
LQ 11 REM 
DU 12 REM 
MH 13 REM 
LW 14 REM 
GG 15 REM 
SQ 16 REM 
HF 17 REM 
QY 18 REM 
YO 19 REM 
LP 2© REM 
ZC 21 REM 
UP 22 REM 
LV 23 REM 
QI 24 REM 
BJ 25 REM 
BL 26 REM 
BN 27 REM 

XT 30 POKE 709,0:POKE 710,1O:POKE 712,18 
UF 40 POKE 729,20:POKE 730,2 • 

QO 58 CLOSE «3:OPEN tt3,4,0,"K:" 

JV 60 PAGE=32010 
YV 70 END 

IT 3217 IF P> 21 OR R = 0 THEN POSITION 1,23 

: print S GE 

T «3, Ml 
BI 320O0 REM 

BN 32O01 REM i-----^ 

RO 32092 REM | START DER ROUTINE PAGE | 

CW 32003 REM ».. . ■ ' - < . I 

CC 320O4 REM 

DS 32010 POKE 82,1:PRINT CHR$(1253:Ml-0 
XY 32015 CLOSE »3:OPEN tt3,4,0,"K:" 

ZX 32020 FOR J=1 TO 39:PRINT "- ,B j:NEXT J 
BL 32030 PRINT " PAGE- UND REM—LISTER, A 
USWAHL ..." 

AF 32040 FOR J=1 TO 39:PRINT :NEXT J 

TX 32O50 POSITION 1,10 

AD 32060 PRINT "(13 LISTEN MIT REM- U. SE 
ITENABSCHLUSS" 

HC 32070 PRINT "ODER (23 NUR MIT SEITENAB 
SCHLUSS ? "; 

GD 32O80 TRAP 32070:GET tt3,M:M~VAL(CHRS(M 
3 3 

CS 32O90 REM 

CX 32091 REM --, 


I 


SZ 32892 REM | PAGE-LISTER AUSGABE . 

EG 32893 REM l ... I 

DM 32094 REM 

WJ 321O0 POKE 82,2:PRINT CHR$(2533 JCHR$ (1 
253 

NO 32110 MAX—32767:MIN-30 


46 HC 
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R5 32120 X=PEEK(1363+256*PEEK(1373 
MT 32130 L=PEEKCX3+256*PEEK(X+13 
GC 32140 P=PEEK(843:R=1:IF Ml = 77 THEN END 
DX 32150 IF M”1 THEN R=PEEK(X+43 
XH 32160 IF L>MAX THEN 32210 

YC 32170 M1=0:IF P> 20 0R R = 0 AND L>30 THE 
N Position 1,23: print " QnEöaECIIB 

: GET »3, Ml 

BA 32175 IF Ml = 77 THEN GOTO 32210 
AU 32177 IF P> 20 OR R = 0 AND L>30 THEN PRI 
NT CHR$(1253: P = 1 
DI 32180 POSITION 4,P-l:LIST L 
UU 32190 X —X + PEEK (X + 23 
ZX 32200 GOTO 32130 

ZZ 32210 POSITION 2,23:PRINT CHR$ (1563 ; " 


OF 32220 POSITION 2,2l:END 

IK 32230 REM IN ZEILE 32170 UND 32177 

KANN DER BEFEHL '"AND L>30" WEG¬ 
GELASSEN WERDEN !!! 


Direcforylocsder 

Übersichtliche und komfortable Auswahl von Diskettenpro¬ 
grammen auf dem Atari XL/XE 


Der Directoryloader (DIR- 
LOAD) ist ein Programm zur 
komfortablen und über¬ 
sichtlichen Auswahl von 
Diskettenprogrammen. Aus 
Gründen der Übersicht auf 
dem Bildschirm werden ma¬ 
ximal 40 Files angezeigt. Bei 
Disketten mit mehr als 40 Fi¬ 
les werden nur die ersten 40 
Files angezeigt. DIRLOAD 
arbeitet mit jedem DOS zu¬ 
sammen und ist vollständig 
in BASIC geschrieben. 

DIRLOAD beinhaltet die 
Möglichkeit, daß nach dem 
Einschalten des Computers 
automatisch DIRLOAD gela¬ 
den wird. Voraussetzung 
dafür ist allerdings ein 
DOS.SYS beziehungsweise 
FMS-SYS File auf der Dis¬ 
kette. Mit DIRLOAD können 
Sie auch das DOS aufrufen. 
Sollte der DOS-Vektor 
(PEEK(10), PEEK(II)) auf 
den Selbsttest des Atari 
600X L/800X L/130X E ’ s zei¬ 
gen, wird angezeigt, daß 
kein DOS ladbar ist. 

Nach Start des Pro- 
.. gramms wird ein Menü an¬ 
gezeigt, in dem Sie vier Pro¬ 
grammpunkte wählen kön¬ 
nen: 

A Directory laden 
B Disk installieren 
C DOS laden 
D Programmende 
Mit Funktion wird Ihnen das 
Directory der Disk angezeigt 
(maximal 40 Files). Es wird 
in folgender Form ange¬ 
zeigt: 

Nummer,Filename,Länge - 


zum Beispiel: 

00 DIRLOAD 10 K oder 12 
FMS.Sys 4 K 

Um nun ein File zu laden, 
tippen Sie nur die Nummer 
ein, dann drücken Sie RE¬ 
TURN, bei einstelligen Zah¬ 
len muß immer eine ,,0“ vor¬ 
weggedrückt werden. 

Dann beantworten Sie die 
Frage, ob Sie das File star¬ 
ten wollen. Wenn Sie hier N 
= Nein drücken, wird das 
File nur geladen = LOAD. 
Andernfalls wird das File ge¬ 
startet = RUN ... 

Mit ,,B“ wird eine Kopie von 
DIRLOAD auf die Disk ge¬ 
schrieben. Sollte bereits ein 
File namens DIRLOAD auf 
der Disk sein, werden Sie 
darauf aufmerksam gemacht 
und gefragt, ob Sie dieses 
File überschreiben wollen. 
Beim Abspeichern wird au¬ 
tomatisch ein Autorun.Sys- 
File auf die Diskette ge¬ 
schrieben, welches ein au¬ 
tomatisches Laden von DIR¬ 
LOAD nach dem Einschal¬ 
ten des Computers ermög¬ 
licht. 

Mit „C“ können Sie, soweit 
möglich, das DOS laden. 

Mit „D“ können Sie aus dem 
Programm ,,aussteigen. 
Während das Directory an¬ 
gezeigt wird (Funktion A), 
können Sie mit der Taste 
,,C“ sich ansehen, wieviel 
Platz noch auf der Disk ist, 
wieviel belegt ist und auf 
wieviel Kilobyte Disk forma¬ 
tiert ist. Mit Taste ,,D" kön¬ 
nen Sie sich den Bild- 


ZE 8 REM * DIRLOAD - VERSION 6.0 * 


ZL 

1 

REM 

* 

FUER ATARI 1 S MIT DISK 

* 

HY 

2 

REM 


LAENGE IO KB. 


HL 

3 

REM 

* 

AUTOR : 

* 

ZP 

4 

REM 

* 

SOENKE HORN 

* 

ET 

5 

REM 

* 

IN DE BANS 5C 

* 

SA 

6 

REM 

* 

210O HAMBURG 9© 

** 

BO 

7 

REM 

* 

TEL. 04O/7602737 


LI 

8 

REM 

* 

AUS DARSTELLUNGSGRUENDEN 
HÜRDE EINE MAKIMALE FILE 


»ZAHL VON 40 FILES GEWAEHLT* 

CV IO DIM A$(40*123 ,B$(123,C$ (35 ,D$(1553, 
E$(203,F$(803 ,FL (403,G$ (203 
IJ 11 D$ (13 = " ": D$ (1553 =■■ ":D$(23=D$ 

WZ 15 G$="LADEN" 

SX 20 ERROR=5O0:START=60O:POKE 65,1 

OL 30 A$(13 =.A$(40*123=" " : A$ (23 = A$ 

UL 50 GOTO START 

EH 60 IF NOT X2 AND RET THEN lOO 
ZX 70 RETURN 

NN SO GRAPHICS O:POKE 710,2O2:POKE 16,64: 
POKE 53774,64:POKE 752,1:POKE 82,2:P0K 
E 709,O:X1=0:IF A$ CI, 13. <>•• " THEN X2 = l 
EC 91 ? CHR$(125):POSITION 2,10:? "SOLL E 
IN BEREITS GELADENES DIRECTORY ANGEZE 
IGT WERDEN (J/N3 ?";:G$ = "LADEN" 

SP 92 CLOSE HliTRAP 90:0PEN ttl,4,O,"K:" 

XZ 93 GET H1,K:IF K = 74 THEN TRAP 100:GOTO 
22© 

WA 94 IF K—78 THEN lOO 
ÖZ 95 IF K—155 THEN X1=X1+1:RET=1 
NZ 96 IF RET AND Xl = l AND NOT (X23 THEN 
? "NEIN !:FOR J=1 TO 4:? CHR£ C303 ; :N 
EXT J:RET-0:GOTO 93 

HU 97 IF RET AND Xl = l AND X2 THEN ? "JA 

!"; :FOR J=1 TO 4:? CHR$ (30); :NEXT J:RE 
T = 0 :GOTO 93 

JO 98 IF Xl = 2 THEN RET=0:IF X2 THEN TRAP 
100:GOTO 220 
IL 99 GOSUB 60:GOTO 93 

NO lOO G$="LADEN":TRAP ERROR:CLOSE «1:POK 
E 71© , 33 : POKE 709,62 : A$ (13 = " ":A$(40*1 
25 =" ":A$(23 = A$:AZ = 0:B$ = "":C$="":D$ = "" 
:E$="" 

YQ 110 OPEN »1,6,0,"D:*.*":P0KE 559,O 
LA 120 TRAP 220 
WJ 130 FOR 1=1 TO 64 
ED 140 INPUT »1,D$:D$=D$(33 

BV 145 FL(I~13=INT(VAL(D$(13,1533/83:IF F 
L (1 — 13 =0 THEN FL (1 — 13 =1 
RQ 150 B$(1,83=D$(1,83 :B$ (9,93=".":B$(IO, 
123 = D$ (9,113 :D$="":X=0 
EM 160 FOR J = 1 TO 12:IF B$(J,J3=" " THEN 
NEXT J:GOTO 2O0 

SG 17© X=X+i:D$(X,X3=B$(J,J3:NEXT J 
MW 180 IF D$C23="FREES.ECT" THEN 228 
CJ 200 A$(1+12*AZ,1+12*AZ+123=D$:D$="":AZ 
= AZ + 1 

FU 210 NEXT I 

RI 220 CLOSE ttl.’POKE 82,©:? CHR$ (1253 :POK 
E 752,1:POKE 710,40:P0KE 709,2:AB=0:GO 
SUB 1350:IF A$(l,13=" " THEN 106 
QY 221 FOR J = 0 TO AZ~1 

BB 222 IF J<10 THEN C$ (13= "0":C$(23= STR$( 
J3 :C$(33 =" " 

XV 224 IF J> 9 THEN C$ (1, 23 =^STR$ (J3 : C$ (33 = 

ia ■■ 

BK 225 IF J <10 THEN C$ (13="0":C$(23=STR$( 
J3 :C$(33 =" " 

OU 23© IF J> 20 THEN AB = 2©:POSITION AB,J“2 
1 

KC 240 IF J <2© THEN AB = 0:POSITION AB,J 
QE 250 ? C$;A$(1+12*J,1+12*J+113 
VM 255 GOSUB 550 
GO 26© NEXT J 
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AKTIV 

ri£OMPUTERN 


schirminhalt ausdrucken 
lassen, als Drucker ist ein 
Atari 1029 vorgesehen, es 
kann aber auch ein anderer 
Drucker sein. Wollen Sie 
vorzeitig das Ausdrucken 
abbrechen, drücken Sie ein¬ 
fach Select. 

Fehleingaben sind fast 
unmöglich, durch Fehlein¬ 
gaben beziehungsweise 
BREAK kann DIRLOAD nicht 
unterbrochen werden. 

DIRLOAD läuft auf allen 
Ataris mit mindestens 32 K 
und einem Diskettenlauf¬ 
werk. 

Es ergeben sich einige 
Unterschiede bei DOS III. 


Folgende Zeilen sind zu än¬ 
dern: 

145 FL(I-1) = INT(VAL(D$ 
(13,15) )/8): IF FL(I-1) =0 

THEN FL(I-1) = 1 
180IF D$(2) = “FREEB.LOC“ 
THEN 220 

1360 INPUT# 1, E$:DCP = 
INT(VAL(E$)/8) :CLOSE 
# 1 :RETURN 

Die Änderungen sind wegen 
der anderen DOS-Gestal- 
tung bei DOS III notwendig. 
Zum Beispiel: DOS II: 028 
FREE SECTORS -► 

DOS III: 24 FREE BLOCKS 

Sänke Horn 


ZD 265 POSITION 8,23:? "TIPPE 
WP 266 IF AZ <10 THEN ? "0";AZj 
BE 267 IF AZ> 9 THEN ? AZ; 

EU 268 ? " FUER MENUE EIN."; 

OY 270 POKE 82, ö: POSITION 6,21:? " h*rilJ»! 


[EINE FILE-NUMMER EIN 


NE 275 REM TEXT IN 270 INVERS SCHREIBEN 
XM 280 CLOSE »1:OPEN ttl,4,0,"K:" 

AJ 281 E$ = "":E$=STR$(AZ3 

QH 282 IF AZ <10 THEN E$(13= "0": ES (2,2)= ST 
R5 (AZ) :X=ASC(E$(2,233 : X=X+128 : ES (23 =CH 
R$ (X):REM "O" IN 282 INVERS 
JP 283 IF AZ> 9 THEN FOR J = 1 TO 2:X = ASC (ES 
(J,J33:X=X+128:E$(J,J3=CHR$(X3:NEXT J 
SC 29© POSITION 18,22:? "fl"j ES;"B":X = 0:NR 
=0:TRAP 290:REM > UND < IN 283 INVERS 
OM 300 GS="EINGEBEN":POKE 559,34:GET »1,K 
:IF K—126 THEN 350 

CR 301 IF K = 68 THEN GS="AUSDRUCKEN":GOSUB 
2000O:GOTO 3O0 

UO 302 IF K = 125 THEN ? CHRS (KJ :SETCOLOR 2 
,0,O:SETCOLOR 1,0,10:GS="LADEN":GOTO 1 
00 

KL 305 IF K—67 THEN GOSUB 1160:GOTO 270 

IL 310 IF K—155 THEN 380 

IW 311 IF K <48 OR K>57 THEN 30O 

TR 320 X=X+1:IF X> 2 THEN X = 2 

LL 33© POSITION 18+X,22:? CHRS (K+1283 

MK 34© GOTO 3©0 

EM 35© IF X>© THEN POSITION 18+X,22:? "■" 
:X=X~1:REM ?" " LEERZEICHEN INVERS 
MO 360 GOTO 3O0 
MO 370 GOTO 3O0 

IC 380 LOCATE 19,22,A:A=A~128:CS(13= CHR$( 
A3 

FI 390 LOCATE 20,22,A:A =A~128:CS(23= CHRS( 
A3 

UO 4O0 NR=VäL(CS3 :ES (1,23="D:" 

NN 401 IF NR = AZ THEN 600 

Ol 405 IF NR <0 OR NR>AZ~1 THEN GOTO 220 
WH 410 ES(33=AS(1+12*NR,1+12*NR+113 
US 42Ö FOR J = 21 TO 23:POSITION 0,J:? " 

";:NEX 

T J:POKE 764,255 

BP 430 POSITION 2,21:? "WOLLEN SIE DAS FI 
LE ";ES C33 :? " STARTEN (J/N3 ?" 

UJ 435 TRAP 470:GS="EINGEBEN" 

WU 440 GET »1,K:IF K = ASC ("N"3 THEN TRAP 5 
OB:LOAD ES 


DK 45© IF K = ASC C"J"3 THEN RUN ES 

OR 460 GOTO 440 

DS 470 IF PEEKC1953<>21 THEN 500 

YI 430 POSITION 2,21:? "DIESES PROGRAMM I 
ST EIN ENTER-FILE ":? " SOLL ES TROTZ 
DEM GELADEN WERDEN ( J/N3" 

XQ 496 CLOSE »1:OPEN ttl,4,0,"K:" 

NO 491 TRAP 480:GET »1,K:IF K=ASC("N"3 TH 
EN 6O0 

NK 492 IF K = ASC (" J"3 THEN TRAP 500:ENTER 
ES 

SB 495 GOTO 491 

CP 50O POKE 82,2:FOR 1=20 TO 23:POSITION 

0 , 1 :? " 

";:NEXT I:PÜSITION 0,20 

XE 501 ? "FEHLER BEIM ";GS;" IST AUFGETRE 
TEN!":GS="EINGABE" 

OL 510 ? ■' BITTE DRUECKEN SIE EINE TASTE 


MX 520 POKE 764,255:CLOSE »1:OPEN »1,4,0, 
"K:":POKE 559,34 

GO 530 TRAP 500:GET »l,K:GOTO 68© 

UG 55© ES="":POSITION AB + 15,J-(21* (AB = 203 
3 

VD 560 X=FL(J3:IF X<10 THEN ES (13= "0":ES( 
23 =STR$ CX3 

XS 570 IF X> 9 THEN ESC13 =STR$ CX3 
BO 580 E$C33=" K”:? ES:RETURN 
QU 608 GRAPHICS 17:P0KE 712,19:P0KE 16,64 
:POKE 53774,64:POKE 559,0 
HI 610 POSITION 0,2 

RN 620 ? »6;" ": REM TEX 

T IN 620,650,670 INVERS SCHREIBEN 
KC 64© ? »6 


KY 650 ? »6; 1 
NX 660 ? »6; 1 
IZ 670 ? »6;* 

ZJ 68© ? »6;' 

CD 69© ? »6; 1 
BK 695 ? »6; 1 
RJ 780 ? »6; 1 
RB 705 ? »6; 1 
NO 710 ? »6; ■ 

LJ 72© ? »6; 1 

,730 TEXT INVERS 
IE 730 ? »6; 


gx^axii: mr^rj w 


»6 


A directory laden 
B disk installieren 
C dos laden 
D progranw verlassen 


COPYRIGHT CC3 01.86 


BY HORNSOFTWARE 


REM 720 


UL 735 POKE 764,255:P0KE 559,34 
CT 740 POKE 710,(20^CPEEK(203>1003+40*CPE 
EK (203 <10033 :IF PEEK(203>2©O THEN POKE 
20,0 

IM 750 IF PEEK(7643=255 THEN 740 
XX 76© IF PEEK(7643 =63 THEN GOTO 9© 

BM 770 IF PEEK(7643=21 THEN GOTO 800 

TD 775 IF PEEK (7643 =58 THEN GOTO 79© 

QK 776 IF PEEK (7643=18 THEN GOTO 1600 

QC 780 GOTO 740 

PA 790 POKE 82,2:GRAPHICS O:POKE 764,255: 
END 

NX 880 DATA 255,255,0,6 137,6,162,0,189,2 
6,3,201,6S,240,5,232,232,232,208,244,2 
32,142,105,6,189,26,3,133,205,169 
UU 801 DATA 107,157,26,3,232,189,26,3,133 
,206,169,6,157,26,3,160,0,162,16,177,2 
05,153,107,6,280,202,208,247,169,67 
JZ 802 DATA 141,111,6,169,6,141,112,6,169 
,14,141,106,6,96,172,106,6,240,9,185,1 
23,6,206,106,6,168,1,96,138,72 

GO 803 DATA 174,105,6,165,205,157,26,3,23 
2,165,206,157,26,3,104,170,169,155,160 
,1,96,0,0,0,0,0,0,0,0,0 
ZT 804 DATA 0,0,0,0,0,76,0,0,0,34,0,68,65 
,79,76,82,73,68,58,68,34,78,85,82,255, 
255,226,2,227,2,0,6 

ZC 805 RESTORE 800:PR=0:? «6;CHR$(1253;" 
WARTE EINEN MOMENT" 
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FG 806 IF D$C1,1)=CHR$C2553 THEN 900 
NO 807 FOR J = 1 TO 152:POSITION 10,11:? »6 
J152-J;" M :READ A:D$CJ,JJ=CHR$CA):PR= 
PR + A 

ZJ 808 POSITION 3,5:? t*6;"LESE DATEN EIN 
! M :NEXT J 

LO 809 IF PR <>14774 THEN GRAPHICS O:? "DA 
TENFEHLER IN 800-804":LIST 800,804:END 
UF 810 GOSUB 900 

BC 860 G$="ABSPEICHERN":TRAP 500:FOR J=1 
TO 2:SAUE "D:DIRLOAD":NEXT J:GOSUB 880 
:OPEN «1,8,0,"D:AUTORUN.SYS":FOR J=1 T 
O 152:PUT «1,ASCCDSCJ,J)>:NEKT J 
OZ 861 REM *J:MT rri'n 

^ r*4rn: h ■" r^TJOHa: m 


HLER BEIM AUTOMATIKLADEN MOEGLICH ! 


BE 870 CLOSE ttl :GOTO 600 

RY 880 POKE 82,2:? :? "SCHREIBE NUN AUTOR 

UN-FILE AUF DISK - ERMOEGLICHT AUTOMA 
TISCHES LADEN UND STARTEN DIESES PRO 
GRAMMES." 

ZW 890 RETURN 


SB 900 GRAPHICS O:POKE 710,180:POKE 16,64 
:POKE 53774,64:? :? :? :? :? :CLOSE «1 

:OPEN ttl, 4,0, "K : " 

NI 910 ? :? "BITTE ZIELDISKETTE EINLEGEN, 

DANN " 

WY 920 ? "BITTE AUF DIE RETURN-TASTE DRUE 
CKEN :" 

UU 930 TRAP ERROR:G$="DISK PRUEFEN" 

WX 940 POKE 764,255 

BC 950 GET tti,K:? CHR$ C1253 : ? :? :? :? :? 

:? •? ; ? ;7 • ? 


BX 955 GOSUB 1000:POKE 710,33 
WO 960 ? :? "SCHREIBE NUN DIR.LOADER AUF 

DIE DISK": CLOSE ttl 
ZT 970 RETURN 

FB lOOÖ TRAP 1020:G$="DISK PRUEFEN" 

ZJ 1018 CLOSE ttl: OPEN ttl, 4 , O, "D : DIRLOAD" : 
CLOSE ttl 

NC 1020 TRAP 1040 

GF 1030 OPEN ttl,4,0,"D:AUT0RUN.SYS":CL0SE 
ttl: GOTO 1050 
AL 1040 RETURN 

QS 1050 ? "*":POKE 82,2:POKE 710,50:P0KE 
709,205 

UN 1060 ? :? :? :? :? :? ;■? :? 

MU 1070 ? "DIR.LOAD-PROGRAMM BEFINDET SIC 
H SCHON AUF DIESER DISKETTE." 

KK 1080 ? :? 

JI 1090 ? "SOLL ALTES DIR.LOAD-FILE UEBER 
SPIELT WERDEN ? CJ/NJ" 

HM 1100 CLOSE ttl : OPEN ttl , 4 , O , "K : " 

NO 1110 TRAP 1050 

RH 1120 GET ttl, K : IF K = ASC ("J"> THEN RETUR 

N 

FZ 1130 IF K = ASC C"N"J THEN 600 

00 1140 GOTO 1120 

TM 1160 POSITION 2,21:? " 


UH 1170 POSITION 2,22:? " 


EH 1180 POSITION 2,23:? " 

■ ■ • 
i 

DH 1185 CP=0:FOR J=0 TO AZ~1:CP=CP+FLCJ3: 
NEXT J 

TK 1190 POSITION 0,21:? "DISKETTENKAPAZIT 
AET IST :";DCP+CP:POSITION 30,21:? "KB 
YTE" 

MZ 1200 POSITION 0,22:? "DAUON SIND BELEG 
T :";CP;:POSITION 30,22:? "KBYTE 

ii 

OR 1210 POSITION 0,23:? "FREIER SPEICHER 
DER DISK:"JDCPJ:POSITION 30,23:? "KBYT 
E"J .-POSITION 0,21 


GB 1220 POKE 764,255 

HB 1230 GET ttl, K 

SE 1240 POSITION 0,21:? •• 


SZ 1250 POSITION 0,22:? " 

■ ■ 


SY 1260 POSITION 0,23:? " 

",- :POSITION 0,21 

BB 1280 RETURN 

FM 1350 IF K=A5C("J") THEN K=0:RETURN 
KE 1355 OPEN ttl, 6 , O , "D : FREESECT . OR" 

CP 1360 INPUT ttl, E$ : DCP=INT (UAL CE$J /8> : CL 

OSE ttl: RETURN 

KO 1600 ADR-PEEK CIO) +256*PEEK (11) 

XW 1610 ? tt6 ; CHR$ (1253 : POKE 559, O 
BN 1620 POSITION 0,0:? »6J" D O S" 

RT 1630 POSITION 0,1:? tt6;" " 

WU 1640 POSITION 0,4 

BT 1645 REM ADR C61987J—ZEIGER DOS AUF SEL 
FTEST C60Ö XL/800 XLJ 
UJ 1650 IF ADR—61987 THEN ? «6;"KEIN DOS 
UORHANDEN" 

SL 1660 IF ADR 0 61987 THEN ? tt6; "DOSDISKE 
TTE EINLEGEN" 

UO 1670 IF ADR <> 61987 THEN ? «6;"DANN RET 
URN DRUECKEN" 

ZY 1680 IF ADR = 61987 THEN ? tt6; "BITTE ESC 
FUER MENUE" 

BB 1690 IF ADR O 61987 THEN ? tt6; "ODER ESC 
FUER MENUE" 

HY 1700 CLOSE ttl : OPEN ttl, 4 , O , "K : " 

JM 1710 TRAP 1610:POKE 559,34 
HI 1720 GET ttl, K 

DU 1730 IF K=155 AND ADR<>61987 THEN DOS 
GS 1740 IF K=27 THEN 600 
QX 1750 GOTO 1700 

EU 20000 BS^PEEKC88J+256*PEEKC89J 
UN 20010 L5C—B5+40*24—1 

UX 20020 TRAP ERROR : CLOSE ttl : OPEN ttl, 8,0, 
"P:":? ttl; CH RS (275 ; CHR$ C14Ü 
CC 20030 FOR J=BS TO LSC 
YD 20040 X=PEEKCJJ:X—X+32 
OE 20050 ? ttl ; CHRS CXJ ; 

TJ 20055 IF PEEKC532793=5 THEN CLOSE ttl : R 
ETURN 

GU 20060 NEXT J 

UC 20070 CLOSE ttl : OPEN ttl, 4 , O , "K :": RETURN 


Sicher Laden 

Ein längeres BASIC-Programm ist auf Diskette gelistet wor¬ 
den. Beim Laden mit ENTER“D:NAME.EXT“ aber stürzt der 
Computer ab. Dieses Programm lädt nun solche Programme 
meist fehlerfrei in den Speicher. Nun kann man auf das Pro¬ 
gramm wieder uneingeschränkt zugreifen. Außerdem kann 
man das Programm dazu benutzen, dem Computer beim La¬ 
den zuzusehen (Atari 400, 800, XL, XE und Floppy). 


Arbeitsweise des Pro¬ 
gramms: 

Zuerst muß in den OPEN- 
Befehl in Zeile 32750 der 
Program mname eingetra¬ 
gen werden. Wird das Pro¬ 
gramm dann mit RUN oder 
mit GOTO 32750 gestartet, 
werden die. Programmzeilen 
auf dem Bildschirm ausge¬ 
geben und in den Speicher 
übernommen. Am Schluß 


wird das Programm automa¬ 
tisch aufgelistet. Nun sollte 
man die Programmzeilen 
32750 bis 32756 löschen und 
das Programm mindestens 
einmal mit SAVE abspei¬ 
chern. Da das Listing nur 
eine Variable benutzt, kann 
man den zusätzlichen Ein¬ 
trag in die Variablentabelle 
vernachlässigen. Übrigens 
arbeitet das Programm nicht 
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AKTIV 
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mit Programmen, welche 
Zeilennummern größer als 
32749 verwenden. Bei sol¬ 
chen Programmen gibt der 


Rechner einen ERROR aus. 
Die Zeilen bis 32749 stehen 
dann unversehrt im Spei¬ 
cher. Holger Wasilewski 


KO 32750 OPEN ttl,4,O,"D:FILENAME.EXT":TRA 
P 32756 

BQ 32751 POKE 766,0:? CHR$(1255;CHR$C29): 
POKE 766,255 

JD 32752 GET «1,A:IF A<>155 THEN ? CHR$CO 
); :GOT0 32752 
UM 32753 ? :? "CONT" 

WL 32754 POSITION O,0:POKE 842,13:ST0P 
GO 32755 POKE 842,12:GOTO 32751 
XK 32756 CLOSE ttl:LIST 0,32749 


Checksummer für Atari 


Da es bei der Eingabe 
von Atari-Listings schon 
öfters Probleme gab, bie¬ 
ten wir Ihnen einen 
Checksummer an, der 
fehlerhafte Eingaben so 
gut wie ausschließt. Die¬ 
ser Checksummer ent¬ 
spricht außer zwei Ver¬ 
besserungen exakt dem 
Checksummer, der in der 
amerikanischen Compu¬ 
terzeitschrift ANTIC jeden 
Monat veröffentlicht wird. 

Verbesserungen: 

1. Die Checksumroutine 
ist jetzt in Maschinen¬ 
sprache und somit auch 
schneller. 

2. Wenn eine Zeile z.B. 
mit PRINT, END, REM 
oder STOP endet, 
stimmte die Checksum in 
der Zeile nicht, da beim 
Listing noch ein SPACE 
(Leerzeichen) hinzuge¬ 
fügt wurde und der 
Checksummer dieses 
Leerzeichen dicht beach¬ 


tet. Unser Lister beachtet 
dies und wird kein 
SPACE am Ende der 
Zeile berechnen. 

3. Der Checksummer 
prüft’ auch, ob die Rei¬ 
henfolge der Buchstaben 
in einer Programmzeile 
exakt dem Listing ent¬ 
spricht. 

Zum Beispiel PRINT 
,,TEST“ im Gegensatz zu 
PRINT ,,TSET“ wird er¬ 
kannt. 

.Tippen Sie PRO¬ 
GRAMM TESTER ein und 
speichern Sie eine Kopie 
auf Diskette oder Cas- 
sette ab. Geben Sie 
GOTO 32 000 ein und fol¬ 
gen Sie den Anweisun¬ 
gen am Bildschirm von 
PROGRAMM TESTER. 
Wenn der 2-Buchstaben- 
Code nicht exakt der¬ 
selbe ist wie der im HC- 
Listing, dann ist in der 
soeben eingetippten 
Zeile ein Fehler. 


Um eine schon vorher 
eingegebene Zeile wie¬ 
der aufzurufen, tippen 
Sie das Sternchen (Mal¬ 
zeichen ,,*“) ein, danach 
(ohne Leerzeichen) die 
Zeilennummer und dann 
[RETURN]. Wenn nun in 
der oberen Hälfte des 
Bildschirmes die Zeile er¬ 
scheint, können Sie 
diese wie gewohnt editie¬ 
ren. Anschließend tippen 
Sie [RETURN]. 

Um das ganze Pro¬ 
gramm zu LISTEN, drük- 
ken sie [BREAK] und ge¬ 
ben LIST ein. Zurück zu 
PROGRAMM TESTER mit 
GOTO 32 000. 

Um PROGRAMM TE¬ 
STER vom soeben einge¬ 
tippten Programm zu ent¬ 
fernen, geben Sie 
LIST“D:FILENAME“, 
0,31999 [RETURN] 
(Cassetten-Benutzer 
UST“C:“,0,31999) ein. 
Schreiben Sie NEW, 
dann ENTER“D :FILE- 
NAME“ [RETURN] (Cas- 
sette-ENTER“C:“). Ihr 
Programm ist nun im 


Speicher ohne PRO¬ 
GRAMM TESTER und 
kann jetzt mit SAVE oder 
LIST auf Diskette oder 
Cassette abgespeichert 
werden. 

Benutzer, die mit BA¬ 
SIC XL Cartridge (der 
Firma 0.0.S.) arbeiten, 
müssen SET 5,0 und SET 
12,0 eingeben, bevor sie 
mit PROGRAMM TESTER 
arbeiten. 

PS. Eine Routine, die 
den PROGRAMM TE¬ 
STER von selbst löscht, 
ist zwar komfortabel, hat 
aber nicht viel Sinn, denn 
beim Löschen der Zeilen 
von PROGRAMM TE¬ 
STER bleiben die Varia- 
blen-Namen, die PRO¬ 
GRAMM TESTER be¬ 
nützt, erhalten. Diese 
Variablen sind in einen 
VARIABEL-NAME-TABEL 
abgelegt und können nur 
entfernt werden, wenn 
wie oben beschrieben 
das Hauptprogramm mit 
LIST und ENTER von 
PROGRAMM TESTER 
getrennt wird. 


32000 REM PROGRAMM TESTER 
32005 REM 

32010 DATA 34,96,215,208,207,198,203,2 

30,200,230,208,208,198,6,255,238,3,208 

,6,254,173,6,254,238,11,144 

32015 DATA 6,253,141,6,253,109,206,165 

,24,206,133,204,177,208,133,203,165,0, 

160,6,255,141,6,254 

32020 DATA 141,6,253,141,0,169,207,133 
,104,104,204,133,104,205,133,104,104,2 
03,133,1,169 

32025 CLR :DIM A$C120),B$C80):CLOSE «2 
: CLOSE «3 

32026 RESTORE 32000 
32030 H=65536:L=256:S=1789 

32035 FOR X = 71 TO 1 STEP -1 :READ Y : BS ( 
X , X) =CHR$CY) :NEKT X 

32040 OPEN t*2,4,0,"E:":0PEN t*3,5,0,"E: 


32045 ? "IS": POSITION 11,1:? 


TESTER 


M PROGRAMM 


32050 TRAP 32045:POSITION 2,3:? "Gebe 
PrograMMzeile ein" 

32055 POSITION 1,4:? " ": INPUT t*2;A$:I 


F A$="" THEN POSITION 2,4:LIST A:GOTO 
32055 

32060 IF A$C1,1)="*" THEN A=UALCA$C2,L 
ENCA$))):POSITION 2,4:LIST A:GOTO 3205 
5 

32065 POSITION 2,10:? "CONT" 

32070 A=UALCA$):POSITION 1,3:? " "J 
32075 POKE 842,13:STOP 
32080 POKE 842,12 

32085 ? "IS" :P0SITI0N n,l:? "ECICSEZlGQI 
Mittilm '' : POSITION 2,15:LIST A 
32090 POSITION 2,16:INPUT t*3;A$:IF A$ = 
"" THEN ? "ZEILE ";A;" WURDE GELOESCHT 
":GQTO 32050 

32095 C = USR CADRCB$),ADR(AS) ,LENC A$)5 :C 
= PEEK CS)+L*PEEK CS + 1)+H*PEEK CS + 2) 


32100 D=INTCC/676) 

32105 D=C-CD*676) 

32110 E=INTCD/26) 

32115 F=D-CE*26)+65 
32120 E=E+65 

32125 POSITION 0,16:? CHR$ CE) ;CHR$ CF) 
32130 POSITION 2,13:? "Wenn CODE nicht 


stiHHt dann 
enstehende Zeile. 


und editiere ob 
'•.GOTO 32050 
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Ansichtssache 




Dieter Winkler, Redakteur 
von HC-Extra 


Mit Standards ist es so 
ein Kreuz. Kaum hat sich ein 
kluger Mensch hingesetzt, 
ein Konzept entworfen und 
es auf der Basis der aktuel¬ 
len technischen Möglichkei¬ 
ten verwirklicht, stellt er vol¬ 
ler Schrecken fest, daß eben 
diese Möglichkeiten wieder 
einmal entscheidend erwei¬ 
tert wurden. 

Da hilft alles nichts, zumin¬ 
dest nicht in unserer com¬ 
puterisierten, hektischen 
Zeit: Das Konzept muß 
überdacht und mit den 
neuen Gegebenheiten in 
Einklang gebracht werden. 
Was sich dann daraus ent¬ 


wickelt, hat im Laufe der Zeit 
nicht mehr viel mit dem ur¬ 
sprünglichen Gedanken¬ 
spiel zu tun. 

So geht es auch Pascal. 
Mittlerweile ist das von Wirth 
1968 konzipierte Standard- 
Pascal nichts weiter als ein 
erster Schritt in der Ge¬ 
schichte einer leistungsfähi¬ 
gen Programmiersprache; 
auch der rund zehn Jahre 
später festgehaltene ISO- 
Standard konnte nicht auf 
Dauer überzeugen. Die mei¬ 
sten Pascal-Dialekte ,,über¬ 
erfüllen“ diesen Standard 
bei weitem. In unserem Pas¬ 
cal-Teil orientieren wir uns 
deshalb an dieser ,,Überer¬ 
füllung“, die in den meisten 
modernen Versionen etwa 
den Typ ,.String“ von vorn¬ 
herein festlegt. In dem einen 
oder anderen Fall wird des¬ 
halb beim Abtippen eines 
Listings ein spezieller Com¬ 
piler mit dem einen oder an¬ 
deren Befehl nicht klar kom¬ 
men; wir bemühen uns des¬ 
halb, nach und nach 
entsprechende Prozeduren 
darzulegen. Weiteres zu 
diesem Thema finden Sie 
unter ,,Pascal zum Eintip¬ 
pen“, wo Mastermind hilft, 
die Übertragbarkeit von 
Pascal-Programmen zu ver¬ 
deutlichen. 



Künstlerische Betätigung 
am Computer mit Hilfe von 
Pascal erfreut sich wachsen¬ 
der Beliebtheit. Kein Wun¬ 
der also, daß entspre¬ 
chende Tools in zunehmen¬ 
dem Maße angeboten wer¬ 
den. ,.Art in Pascal“ nennt 
sich ganz folgerichtig eine 
Grafik-Erweiterung für sämt¬ 
liche CPC-Computer, die für 
Hisoft-Pascal in englischer 
Fassung vorliegt und von 
HC-Redakteur Horst Brand 
auf der Armstrad-Messe in 
London entdeckt wurde. Es 
kann zur Erstellung eigener 
Spiele und Programme in 
Hisoft-Pascal eingesetzt 
werden, was vor allem des¬ 
wegen naheliegt, weil das 
Programm in Quelltext vor¬ 


liegt. Darüber hinaus ist es 
ein ganz normales Grafik¬ 
programm mit der Auswahl 
zwischen vier Pinselstärken, 
Kreis-, Ellipsen- und Recht¬ 
eckerstellung und präziser 
Pixelansteuerung, das zur 
Ausnutzung der Grundgrafi¬ 
ken noch nicht einmal den 
Hisoft-Compiler voraussetzt 
— ratsam ist er dennoch. 


Wer ,.Alice im Wunder¬ 
land“ kennt, dürfte die 
ideale Voraussetzungen be¬ 
sitzen, um sich mit diesem 
neuen Pascal-Entwick¬ 
lungssystem für IBM-Kom- 


patible auseinanderzuset¬ 
zen. Konkurrenz zu Turbo 
oder kompatibel zu dieser 
mittlerweile weitverbreitet¬ 
sten Pascal-Version? Wohl 
ein bißchen von beidem, vor 
allem aber ein praxisbezo¬ 
genes System, das über ei¬ 
nen Tutor sogleich in die 
Welt der Programmierung 
führt. Erfreulich ist neben 
der umfangreichen Doku¬ 
mentation, daß 256-KByte- 
RAM eines Billig-PC’s zur 
Arbeit genügen, wie Alice in 
der Redaktion auf einem 
Multitech Populär bewies. In 
einer der nächsten Ausga¬ 
ben werden wir das als 
,,Personal Pascal“ ange¬ 
priesene Komplettsystem 
unter die Lupe nehmen. 



Wer seinen Apple liebt, 
gönnt ihm eine CP/M-Karte 
— naheliegend, daß in die¬ 
sem Fall auch zu Turbo-Pas- 
cal gegriffen wird. Überar¬ 
beitet präsentiert sich jetzt 
Apple Il-Pascal, das kein 
CP/M benötigt und in der 
neuen Version 1.3 als ,.fort¬ 
geschrittene Pascal-Ent- 
wicklungssprache“ ange¬ 
priesen wird. Entscheiden¬ 
der Vorteil im Vergleich zur 
Vorläufer-Version: Das 

3V2"- Laufwerk mit 800 KByte 
wird voll unterstützt, wo¬ 
durch sich das Entwick¬ 
lungssystem auf eine Dis¬ 
kette unterbringen läßt. 



In der letzten Folge von 
HC-Extra stellten wir 
MacAdvantage vor, die 
UCSD-Antwort auf den Mac¬ 
intosh. Aber es gibt weit 
mehr Neues zu berichten. 
Apple stellt ein rund 440 
Mark teueres Entwicklungs¬ 
system vor, das in erster Li¬ 
nie eine Ergänzung zu Mac- 
und Lisa-Pascal ist und in 
diesen Versionen geschrie¬ 
bene Programme zum 
68000er-Code compiliert. 


Damit kann auf die Macin- 
tosh-Routinen wie Opera- 
ting System, Quick Draw 
und Printung zugegriffen 
werden. Dieses neue Ent¬ 
wicklungssystem steht in 
harter Konkurrenz zu TML- 
Pascal, das als leistungsfä¬ 
higes System in Amerika 
weite Verbreitung gefunden 
hat. Es bleibt abzuwarten, 
welches von beiden Syste¬ 
men sich in Deutschland 
durchsetzt. 



Seinem futuristischen 
Aussehen zum Trotz blieben 
die Verkaufszahlen des En¬ 
terprise weit hinter den Er¬ 
wartungen zurück. Dennoch 
gibt es jetzt gleich zwei Pas¬ 
cal-Versionen für ihn: 
Turbo-Pascal für etwa 230 
Mark und Hisoft-Pascal für 
knapp 70 Mark. Wie sich 


diese beiden Versionen un¬ 
terscheiden, können Sie in 
der Juni-Ausgabe von HC 
nachlesen - beide verfü¬ 
gen über Editor und Compi¬ 
ler, der Befehlssatz von Hi- 
soft ist gegenüber dem von 
Turbo eingeschränkt, doch 
läßt sich mit beiden Versio¬ 
nen gut arbeiten. 


Im September veranstal¬ 
tet HC einen Programmier¬ 
kurs, der von Uli Kern gehal¬ 
ten wird, Autor der Turbo- 
Pascal-Reihe von Chip Spe¬ 
cial und zahlreicher Artikel 
zu diesem Thema. In insge¬ 
samt 16 Stunden werden 
zwischen 19 und 21 Uhr Ein¬ 
steiger und Fortgeschrittene 
in Turbo-Pascal unterwie¬ 


sen. Die Einsteiger sind je¬ 
weils dienstags an der 
Reihe, Beginn 2.9., wäh¬ 
rend Fortgeschrittenen der 
Donnerstag Vorbehalten 
bleibt, Start 4. 9. 86. Anmel¬ 
dungen bitte an Frau Feig 
unter der Anschrift: Redak¬ 
tion HC, Schillerstr. 23a, 
8000 München 2 oder telefo¬ 
nisch unter 0 89/5 14 93 43. 
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GAMEWORKS 


TURBO 

EDITOR 


Schach, Bridge und GoMoku - die drei Klassiker der 
Karten- und Brettspiele als (zugegebenermaßen nicht 
ganz vollwertiger) Ersatz für klassische Bettspiele. 

Dabei ist Spielen mit diesem Paket noch das kleinste 
Vergnügen: Indem Sie Ihr eigenes Spiel verbessern 
und dem vorhandenen Schach (Bridge/GoMoku) 
Variationen hinzufügen, lernen Sie, wie man in Turbo- 
Pascal Spiele programmiert. Spaß und Unterhaltung 
halten sich die Waage mit dem Lerneffekt, den Sie 
mit diesem Programm wie nebenbei erzielen. Es ist 
deshalb auch vorzüglich zur Demonstration und für 
den Unterricht geeignet. Turbo-Gameworks ist unsere 
vergnüglichste Toolbox aus der Turbo-Pascal-Family 
und sollte deshalb jedem Anfänger mitgegeben 
werden. Der Profi hat Gelegenheit, sich in die Höhen 
der Spieltheorie zu versteigen und wer gar nicht tun 
will, läßt seinen Computer gegen sich selbst spielen. 
Das kann Ihr PC zur Erholung auch mal brauchen. 
Vorläufig brauchen Sie aber einen IBM PC (oder 
Kompatiblen) zum Spielespaß und natürlich zum 
Compilieren Turbo-Pascal 3.0 

Für Kenner ein paar Daten, was mit Gameworks 
möglich ist: 

- jederzeit ein Spiel abbrechen und später wieder¬ 
aufnehmen. 

- die Spielstärke stufenlos variieren 

- beliebige Stellungen eingeben und analysieren 

- Zugvarianten durchspielen 

- spezielle Modi für Mattaufgaben und Austesten 
neuer Strategien 

- Auswertung eines ausführlichen Protokolls. 

Zitat: Georg Koltanowski, Schach-Kolumnist und 
Präsident der amerikanischen Schachvereinigung: 
»Spaß und Unterhaltung bei TURBO GAMEWORKS 
sind grenzenlos und vor allem kann das Programm 
dazu beitragen, Ihr Schachspiel unbegrenzt zu ver¬ 
bessern«. 


Jede Toolbox wie immer DM 225,72 


ln dieser Toolbox finden Sie wirklich alles, was Sie 
sich zur Umsetzung Ihrer Texte auf einem PC nur 
wünschen können: 

MicroStar - ein unglaublich leistungsfähiges Text¬ 
verarbeitungsprogramm mit allem Drum und Dran: 

- Pull-Down Menü, die komfortabelste und leich¬ 
teste Art, ein Programm zu bedienen. 

- Windows, bis zu 8 verschiedene Texte, können 
Sie durch 8 Bildschirmfenster gleichzeitig ansehen, 
verändern und montieren. 

- Multitasking, während Sie den fertigen Text aus- 
drucken wollen, schreiben Sie bereits den näch¬ 
sten - gleichzeitig! 

- RAM-resident, auch in großen Dateien blättern 
und arbeiten Sie ohne jedes Warten. 

- Lightning-Schnittstelle, schon heute können Sie 
MicroStar oder Ihr Turbo-Programm an Borlands 
neuester »Sensation« (Zitat aus PC Magazine) 
TURBO-UGHTNING anschließen! Turbo-Lightning 
ist eine blitzschnelle Rechtschreibkorrektur, aber 
auch Sprachtraining durch Anzeige bedeutungs¬ 
ähnlicher Wörter. Vorläufig in englisch. 

- und natürlich mit allen Funktionen der großen 
Textverarbeitungssysteme wie UN DO, Block, 
Zentrieren, Tabulieren, Umbruch etc. ausgestattet. 



MicroStarTM wird als funktionsfähiges Programm und 
im Turbo-Pascal Quellcode geliefert. MicroStarTM 
ist also nicht nur ein sehr edles Textsystem, 
sondern auch eine Riesenfundkiste für die 
Konstruktion und die Benutzeroberfläche 
Ihrer eigenen Turbo-Programme. Freie 
Nutzung ohne Lizenzgebühren! 

Vorläufig nur für IBM-PC und 
Kompatible, zum Compilie¬ 
ren brauchen Sie natürlich 
Turbo-Pascal 3.0! 
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Aus der umfassenden Palette von Utilities 
und Programmbibliotheken picken wir uns 
diesmal Turbo-Screen heraus. 


I n dieser Ausgabe von HC-Extra 
ist viel von Standard-Pascal die 
Rede. Wie dieser Standard in 
der Praxis aussieht, wissen zahl¬ 
lose Anwender bereits: Er heißt 
Turbo-Pascal und kostet je nach 
Ausführung zwischen 200 und 300 
Mark. Das ist neben der unleugba¬ 
ren Qualität von Turbo letztendlich 
ein reiner Beweis für Masse. So 
massiv ist mittlerweile die in die 
Hunderttausende gehende Ver¬ 
breitung von Turbo geworden, daß 
es für diesen Dialekt fast mehr Zu¬ 
satzprodukte als ernstzuneh¬ 
mende Konkurrenten gibt. 

Bei den Zusatzprodukten han¬ 
delt es sich in erster Linie um Soft¬ 
ware in Form von Programmsamm¬ 
lungen und Utilities zu jeweils 


spezielle Anwendungen erworben 
werden, etwa eins für mathemati¬ 
sche und eins für kaufmännische 
Anwendungen. Die Preise der ein¬ 
zelnen Module orientieren sich bei 
diesem wie anderen Anbietern an 
denen von Turbo-Pascal, das 
heißt, sie übersteigen selten die 
200-Mark-Grenze. Auch in Fragen 
des Quellcodes bleibt den Anbie¬ 
tern nichts anderes übrig, als die 
Karten offen auf den Tisch zu le¬ 
gen : Wer jetzt noch mit abgeschot¬ 
teten Programmen kommt, kann — 
sofern es sich nicht um rein kom¬ 
merzielle Software handelt — 
gleich einpacken. Reine Pro¬ 
grammsammlungen haben natür¬ 
lich einen entscheidenden Nach¬ 
teil: Sie veralten. Einleuchtende 


Außer den Sammlungen mit Pro¬ 
grammen gibt es noch sogenannte 
Utility-Sammlungen. Dabei fängt 
die Sache natürlich an, problema¬ 
tisch zu werden. Gute Utilities 
zeichnen sich gerade durch Kürze 
und rechnerspezifische Anpassun¬ 
gen aus. Sobald aber auf die Ma¬ 
schinenebene zugegriffen wird, 
sind allgemeingültige Ansprüche 
einer Utility dahin. Man denke da¬ 
bei etwa nur an spezielle Drucker¬ 
anpassungen. Das ist der Grund, 
warum gerade die für den Anwen¬ 
der dringendsten Problemlösun¬ 
gen durch mehr allgemein gehal¬ 
tene Sammlungen oft nicht gebo¬ 
ten werden können. 

Was nicht heißt, daß Utility- 
Sammlungen nicht ihr Geld wert 
sind. Eine der bekanntesten sind 
die Turbo-Power-Utilities für Dis¬ 
kettenverwaltung, Druckerhilfen 
und ähnlichem. Doch bevor wir 
uns in einer der nächsten Ausga¬ 
ben mit diesem Gebiet auseinan¬ 




Turbo Screen - Uersion 2.0 Copyright CC) 1985 by CID Computer- 

Initialisierung Funktionstasten Informations-Dienst GnbH, Hamburg 


FUr die Initialisierung von Turbo Screen 
druecken Sie 3nal die Carriage Returir-Taste. 


Bildschirmdateiname < > 

(X!X-X.X-X) 

Texte lesen aus Datei < > 

(XIX-X.X-X) 

Funktionstastenset Nr. <1> (1/2) 

Falls Sie verschiedene Tastaturen verwenden, koennen Sie zwei verschiedene Funk¬ 
tionstastensets definieren. Es kann dann mit diesem Programm der Set gewechselt 
werden, indem der aktuell zu verwendende Set angewaehlt und die Bearbeitung auf 
dem naechsten Bildschirm mit ' E’ beendet wird. 


Initialisierung: Anpassung an Tastaturen 


Turbo Screen - Uersion 2.0 Copyright (C) 1985 by CID Computer- 

Initialisierung Funkt ionstasten Informations-Dienst GkibH, Hamburg 


Funktionstaste oder Tastenknthination und die Carriage-Return-Taste druecken 


... Cursor links.: ESC X 

... Cursor rechts.: ESC N 

... Zeichen Ineschen. ESC S 

... Zeichen einfuegen.: ESC R 

... Feldinhalt loeschen.: A I 

... Zeichen nach links loeschen. "li 

... Cursor runter/Bildschinafreigahe.. ESC P 

2. Ende.: ESC 0 

3. Cursor hoch / 1 Feld xurueck. ESC H 

4. Sprung auf 1. Zeile / 1. Feld.: ESC G 

5. Bildschirmneuausgabe. ESC I 

6. Initialisieren Bildschimdatei....: ESC ; 

7. Kopie Bildschirm. ESC A 

8. Cursorposition anzeigen. ESC C 

9. Sprung auf Zeilenanfang. ESC D 

10. ESC 0 


B oder b: zurueck; - : Funktionstaste loeschen E oder e: Ende 


Funktionstasten: Problemlos belegt 


abgegrenzten Themenbereichen. 
Größtenteils liegen sie im Source- 
Code vor und gewähren damit Ein¬ 
blick in die jeweilige Programm¬ 
technik — Anregung zum Nach- 
und Bessermachen. 

Die vom Turbo-Pascal-Vertrieb 
Heimsoeth angebotenen Tools ha¬ 
ben wir bereits in den letzten Aus¬ 
gaben mehr oder weniger ausführ¬ 
lich besprochen; jetzt sind erst 
einmal die Fremdanbieter an der 
Reihe. 

Eine der bekanntesten Pro¬ 
grammbibliotheken ist die Turbo- 
Lader-Reihe. Die Idee, die ihr zu¬ 
grunde liegt, ist die der Modul¬ 
technik. Ausgehend von einem 
Grundmodul können Module für 


Programmierbeispiele und gän¬ 
gige Problemlösungen finden 
rasch weite Verbreitung in allen 
Medien. Entscheidend für den An- 


Alles im Source-Code 



wender ist aber allemal ein klares 
Konzept und Programme auf der 
Diskette, die nicht erst abgetippt 
zu werden brauchen. Nicht zu un¬ 
terschätzen ist auch der Lerneffekt 
und die Möglichkeit, einzelne Pro¬ 
gramme eigenen Bedürfnissen an¬ 
zupassen. 


dersetzen, ist diesmal Turbo- 
Screen der CID-Computer aus 
Hamburg an der Reihe. Dabei geht 
es um das Problem der Datenaus¬ 
gabe auf den Bildschirm. 

Das Sammeln von Daten und die 
anschließende Aufbereitung ist ein 
Hauptaufgabengebiet der EDV. 
Viele, zum Teil recht umfangreiche 
Programme wurden bereits in den 
Anfangszeiten dieses noch recht 
jungen Mediums geschrieben. Da¬ 
bei ging es jedoch weniger um den 
Komfort der Bedienerführung als 
aus Gründen der Speicherplatzko¬ 
sten um rein verwaltende Pro¬ 
gramme. 

Seit einiger Zeit bietet die Ham¬ 
burger Firma CID - Computer In- 
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formationsdienst — ein ganzes Pa¬ 
ket aufeinander abgestimmter Pro¬ 
gramme zur Erfassung, Änderung 
und zum Löschen von Daten an. 
Nach einem ausführlichen Test 
möchte ich in zwangloser Reihen¬ 
folge die einzelnen Mitglieder die¬ 
ser Turbo-Familie vorstellen. 

Am Anfang steht das Sammeln, 
in EDV-Kreisen fachmännisch Er¬ 
fassen genannt. Dabei entstehen 
bereits die ersten Probleme. Wer 
erfaßt, will und muß auch überprü¬ 
fen, ob denn die Eingaben den 
Vorgaben in formaler Hinsicht ent¬ 
sprechen. Die Überprüfung nume¬ 
rischer Eingaben wirft Fragen auf, 
ob Leereingaben oder die Null er¬ 
laubt sind, ob negative Zahlen, 
keine oder eine bestimmte Anzahl 
von Nachkommastellen erlaubt 
sind. Bei der Überprüfung alpha¬ 
numerischer Eingaben stellt die 
Groß- und Kleinschreibung den 
Datenbankprogrammierer eben¬ 
falls vor eine Entscheidung. 


und können auf beliebige MS- 
DOS, PC-DOS und CP/M-Systeme 
übertragen und dort verwendet 
werden. 

Turbo-Screen enthält außerdem 
eine Reihe von Standardmoduln 
zum Editieren einzelner Eingabe¬ 
felder sowie die komplette Ablauf¬ 
steuerung von einem Eingabefeld 
zum nächsten. Jedoch auch zu¬ 
rückgesprungen werden kann pro¬ 
blemlos, wenn vorangegangene 
Eingaben geändert werden sollen. 
Die Module werden in die Anwen¬ 
dungsprogramme eingebunden. 

Wichtig zur Arbeitserleichterung 
ist die Ausnutzung der Funktions¬ 
tasten. Die Definition dieser Tasten 
ist maschinenunabhängig gehal¬ 
ten. Bei Einsatz des Systems auf 



Bildschirm-Masken 


einem Rechner mit einer anderen 
Tastatur können zwei verschiedene 
Funktionstastensets definiert und 
wechselweise installiert werden. 
(Pro Rechner eine Lizenz erforder¬ 


ginnt, wird von diesem Programm¬ 
teil akzeptiert. So können bei¬ 
spielsweise auch Funktiönstasten 
mit Ansi-Codes oder solche mit 8- 
bit-Codes verwendet werden. 

Die eigentliche Maskenerstel¬ 
lung ist mit wenigen Tastendruk- 
ken erledigt. Man bekommt einen 
leeren Bildschirm angeboten und 
beginnt mit dem Plazieren der Na¬ 
men der Ein- und Ausgabefelder. 
Auf Tastendruck übernimmt das 
Programm die Anfangspunkte und 
speichert sie in einer Datei ab. 

Mit dem zweiten Programm die¬ 
ser Familie, Turbo-Screen-Plus, 
kann man sogar die Position der 
Ein- und Ausgabefelder in diese 
Datei übernehmen. Nach und nach 
wächst menügesteuert die kom¬ 
plette Maske der gewünschten Da¬ 
tenbank im Dialog auf dem Bild¬ 
schirm. Jede Phase kann doku¬ 
mentiert werden. 

Turbo-Screen-Plus bietet zu¬ 
sätzlich per Menüführung die Ge¬ 
nerierung eines Bildschirmmo¬ 
duls, einer Bildschirmdatei und 
eines Ausdruckes der Bildschirm¬ 
beschreibung. 

Hier liegt meiner Meinung nach 
auch ein Schwachpunkt des sonst 


TURBÖ 5CREEW+ 


1. Bildschirwmaske anlegen/ändern 

2. Bildschirmmoduln generieren 

3. Bildschirmbeschreibung drucken 

4. Funkt ionstasten anlegen/Xndern 

5. Turbo Pascal 


6. Bildschirmdatei an legen 

7. Funktionstasten kopieren 

8. Bildschirmdatei -> Textdatei 

9. Textdatei -> Bildschirmdatei 


Starten von Laufwerk < > 



Copyright (C) 

1985 by CID 
Computer-1nforma- 
tions-Dienst QnbH 


City BUro: 
Zippelhaus 4 
2800 Hamburg 11 
Tel.: 040/33 74 78 


Hauptmenii: Reichhaltige Auswahl 


Turbo ScreerrL 
Hilfe: Hauptauswahl 


Copyright (C) 1985 by CID-Ccmputer- 
Informations-Dienst GkbH, Hamburg 


Feld l: Auswahl 

Uaehlen Sie bitte einen der aufgefuehrten Punkte aus und geben Sie die zugehoe- 
rige Nummer in diesem Eingabefeld ein. 

Neben den Auswahlpunkten 1-3 und 7, die Programme von Turbo Screen+ aufrufen, 
finden Sie im ttenue auch Punkte, die Programme des Grundsystems Turbo Screen 
ansprechen. Wenn Sie moechten, dass nach Ausfuehrung dieser Programme wieder 
in das Menue von Turbo Screenf verzweigt wird, beachten Sie bitte die Anwei¬ 
sungen im Handbuch, die sich auf die Aenderung der Tprbo Screen-Programme be¬ 
ziehen. 

Feld 2: Aufrufen von Laufwerk 


L 


In diesem Feld kann das Laufwerk ausgewaehlt werden, auf dem sich das zu star¬ 
tende Programm befindet. Ist es das voreingestellte Laufwerk, so ist eine Ein¬ 
gabe nicht erforderlich. In diesem Fall koennen Sie auch die Auswahl auf Feld 1 
mit der Bildschirmfreigabetaste (Cursor nach unten) abschicken. Dann wird Feld 
2 erst garnicht angesprungen. 

—> Taste druecken. 


Hilfe: Zum schnellen Einstieg 


Hier mußten bisher immer um¬ 
fangreiche Prüfroutinen program¬ 
miert werden. Turbo-Screen nimmt 
diese Arbeit ab. Umfassend sind 
die kleinen und größeren Nöte ei¬ 
nes „eigentlich Nur-Anwenders“ 
bedacht worden und in eine stan¬ 
dardisierte Dialogeingabesteue¬ 
rung für Turbo-Pascal-Programme 
umgesetzt worden. Das Programm 
ist ein Maskeneditor, mit dem Bild¬ 
schirmmasken am Computer ent¬ 
worfen, gespeichert und auch mo¬ 
difiziert werden können. Diese 
Bildschirmsteuerung ist leicht in 
andere Sprachen wie BASIC, CO¬ 
BOL oder PL/I übertragbar. 

Die einmal gespeicherten Mas¬ 
ken werden Programmbestandteil 


lieh). Neben dem Bildschirmeditor 
und den für die Eingabesteuerung 
notwendigen Standardmodulen 
werden Konvertierungsprogramme 
zur Umsetzung von Bildschirmda¬ 
teien in Textdateien und umgekehrt 
mitgeliefert. So können die selbst¬ 
erstellten Masken zwischen ver¬ 
schiedenen Rechnern mit unter¬ 
schiedlichen Betriebssystemen 
übertragen werden. (Lizenz!) 

Die Arbeit mit Turbo-Screen ge¬ 
staltet sich einfach und übersicht¬ 
lich. Als erstes Menü erscheint die 
Anpassung an die Tastatur. Dabei 
fällt auf, daß die Anpassung prak¬ 
tisch auf jeder Tastatur möglich ist. 
Jede Zeichenfolge, die mit einem 
nichtdarstellbaren Zeichen be¬ 


sehr gut durchdachten Pro¬ 
gramms. Wer wie ich nur einen 80- 
Zeichen-Drucker benutzt, muß sei¬ 
nen Drucker vorher auf kompri¬ 
mierte Schrift umschalten. Dazu 
muß man das Programm verlassen 
oder von vornherein bei der Arbeit 
mit Turbo-Screen diese Umschal¬ 
tung vornehmen. Ich wünsche mir 
eine kleine Anpassungsroutine, in 
der ich die Steuersequenz meines 
Druckers dem Programm mitteilen 
kann, so daß die Umschaltung auf 
„Condensed Mode“ sowie auch 
die Rücksetzung vom Programm 
im Bedarfsfall ausgeführt wird. An¬ 
sonsten ist den Programmen Pro¬ 
fessionalität zu bescheinigen. 

Wolfgang Börner/dw 
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In der Fernuni kann sich jeder einschreiben, 
der Pascal lernen will — Abschlußprüfung 
eingeschlossen 


Es gibt viele Möglichkeiten, Pas¬ 
cal zu erlernen. Man kann Bücher 
lesen, Zeitschriftenserien verfolgen 
oder Lernprogramme bearbeiten. 
Diese Möglichkeiten haben gravie¬ 
rende Nachteile gemein: einerseits 
fehlt eine verläßliche Kontrolle des 
erworbenen Wissens, andererseits 
kann man seine Kenntnisse (bei¬ 
spielsweise bei Bewerbungen oder 
beim Studium) nicht ohne weiteres 
nachweisen. 

Die reinen Hobbyprogrammierer 
haben es auf den ersten Blick da 
noch relativ leicht: Nach dem Er¬ 
werb von Compiler und Editor wird 
einfach drauflosgehackt, wobei 
Lücken anhand der mittlerweile 
zahlreich angebotenen Literatur 
Stück für Stück geschlossen wer¬ 
den. Aber gerade das wird oft zum 
Problem. Verläßliche Hinweise auf 
den Wert unterstützender und zu¬ 
meist teurer Literatur erhält man 
erst, wenn das gute Stück zumin¬ 
dest halb durchgearbeitet ist. 

Nicht seiten sinkt der Wert eines 
Buches dadurch, daß es sich auf 
veraltete Versionen und Sprach- 
Dialekte bezieht — etwa, wenn die 
Turbo-Version 3.0 außer acht ge¬ 
lassen wird und dafür breit Nach¬ 
teile der Version 2.0 besprochen 
werden. Eine Möglichkeit zur Ab¬ 
hilfe besteht darin, zusätzlich zum 
Buch eine Programm-Diskette an¬ 
zubieten. Von dieser Grundidee 
gehen beispielsweise der Turbo- 
Tutor der Firma Heimsoeth und die 
preiswerte Turbo-Pascal-Reihe 
von CHIP-Special aus. Typisch für 
solche Werke ist, daß der Quell¬ 
code ausgedruckt im Begleittext 
steht. 

Das ist auch notwendig, wenn 
Pascal-Dialekte nicht rechnerspe¬ 
zifisch sind und auch Besitzer so¬ 
genannter Exoten-Rechner auf 
ihre Kosten kommen sollen. Natur¬ 
gemäßwerden begleitende Disket¬ 
ten immer nur für ein begrenztes 
Rechner-Spektrum angeboten. 
Aber es geht natürlich auch umge¬ 
dreht. 

So bietet der Verlag 
Markt&Technik ein neues Werk mit 
dem Titel,,Pascal mit dem C64“ an. 
Im Mittelpunkt steht der Rechner 
und ein speziell auf ihn zuge¬ 


schnittener Pascal-Compiler und 
Editor; letztere sind im Kaufpreis 
von 52 Mark enthalten. Der Compi¬ 
ler entspricht dem Standard und 
ist damit etwas für Pascal-Puriti- 
sten; für weitergehende Arbeit ist 
er kaum geeignet. Leider ist seine 
Bedienungsanleitung etwas dürftig 
und schmälert den Nutzen als Ein¬ 
steigersystem. 


Pascal im Fernstudium 
- ein Erlebnisbericht 


Eine interessante Alternative 
bietet das Fernstudium, in 
Deutschland zum Beispiel an der 
Fernuniversität in Hagen. Neben 
zahlreichen anderen Kursen der 
verschiedensten Fachgebiete wird 
dort — vom Fachbereich Mathe¬ 
matik/Informatik — auch ein Pas¬ 
cal-Kurs angeboten. Vorausset¬ 
zungen zum Studium existieren 
nicht: formell heißt man allerdings 
„Gasthörer“, solange man keine 
„Hochschulzugangsberechti¬ 
gung“, sprich: Abitur, hat. Über 
eine Anerkennung der erbrachten 
Leistungen entscheidet im Studi¬ 
umsfall die jeweilige Fachschaft. 

Nachdem ich bereits ein Seme¬ 
ster lang den Kurs „Programmie¬ 
rung“ belegt hatte, schrieb ich 
mich im Sommersemester 1983 
zum Kurs „Pascal“ ein. Bald darauf 
erhielt ich die erste Kurseinheit des 
aus ingesamt sieben Teilen beste¬ 
henden Kurses. 

Jede Einheit besteht aus einem 
etwa 50seitigen Textteil, der thema¬ 
tisch abgeschlossen und in sich 
übersichtlich gegliedert ist. Darin 
integriert sind Selbsttestaufgaben, 
die zum frühzeitigen Erkennen von 
Unsicherheiten wichtig sind. Dazu 
kommen Übungsaufgaben, die ei¬ 
nerseits Schwerpunkte der jeweili¬ 
gen Einheit aufzeigen und ande¬ 
rerseits die Überprüfung des Er¬ 
lernten erleichtern. Schließlich 
gehören zu jeder Einheit Testauf¬ 
gaben, die selbständig, wenn 
möglich unter Klausurbedingun¬ 
gen, gelöst werden und anschlie¬ 
ßend nach Hagen geschickt wer¬ 


den sollen. Die Lösungen werden 
dort EDV-mäßig erfaßt und bewer¬ 
tet, das Ergebnis dem Studenten 
mitgeteilt. Ein bestimmter Prozent¬ 
satz richtiger Lösungen ist Voraus¬ 
setzung zur Teilnahme an der Ab¬ 
schlußklausur. Alle sieben Einhei¬ 
ten zusammen ergeben — nicht 
zuletzt dank des mitgelieferten 
Glossars — ein recht brauchbares 
Werk über die Sprache Pascal. 

Da ich bereits einige Grund¬ 
kenntnisse der Sprache Pascal be¬ 
saß, glaubte ich mich über den 
Hinweis, die Einheiten müßten 
durchgearbeitet, nicht nur gelesen 
werden, hinwegsetzen zu können 
und hatte infolgedessen binnen 
zweieinhalb Stunden die Kursein¬ 
heit ganz durchgelesen, aber nur 
die Hälfte behalten. Dementspre¬ 
chend sah auch die Beurteilung 
meiner Einsendeaufgaben aus, die 
ich einige Wochen später in Hän¬ 
den hielt. 

Die nächsten Einheiten bearbei¬ 
tete ich dann schon intensiver, wo¬ 
durch ich etwa vier bis fünf Stun¬ 
den je Einheit brauchte; das 
reichte für etwa 80 Prozent bei den 
Einsendeaufgaben. Damit lag 
mein Aufwand allerdings immer 
noch unter dem vorgesehenen von 
vier Stunden pro Woche oder etwa 
15 Stunden pro Kurseinheit. Be¬ 
merkenswert ist, daß gewisse ma¬ 
thematische Kenntnisse (etwa der 
Vektorbegriff) vorausgesetzt wer¬ 
den, die ich zusätzlich erwerben 
mußte. Die im Verlauf des Kurses 
beispielhaft gelösten Probleme 
sind meist mathematisch-natur¬ 
wissenschaftlicher Art, so daß ich 
gleichzeitig auf diesem Gebiet ei¬ 
nige mir neue Sachverhalte erfuhr. 
Ende des Jahres fand schließlich 
in Köln die Abschlußklausur statt, 
die ich mit „gut“ bestand. 

Zusammenfassend bleibt festzu¬ 
stellen, daß man für 75 Mark nicht 
nur ein Lern- und Nachschlage¬ 
werk über die Sprache Pascal er¬ 
hält, sondern darüber hinaus Ein¬ 
blick in das Studienfach Informatik 
gewinnt. Sicherlich ist ein solches 
Fernstudium wesentlich effektiver 
als das Lesen eines Buches, doch 
ist man im zeitlichen Zugzwang 
und muß erheblich mehr Zeit inve¬ 
stieren. Insgesamt scheint mir das 
Fernstudium jedenfalls für den 
ernsthaften Interessenten eine vor¬ 
teilhafte Alternative, zumindest 
aber eine sinnvolle Ergänzung zu 
sein. Jörg Tegeder/dw 
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Angela Remuß 
von der Firma Heimsoeth beantwortet 
exklusiv Fragen unserer Leser. 


Fragen an unsere 
Hotline 

Falls Sie irgendwelche Probleme 
mit Turbo-Pascal oder bestimmte 
Fragen zur Anwendung dieser 
Sprache haben, können Sie sich 
direkt an unsere Hotline wenden. 
Schreiben Sie an: 


Vogel- Verlag 
Redaktion HC 
Stichwort: Pascal-Hotline 
Schillerstr. 23a 
8000 München 2 


Aus dem Stoß der vorliegenden 
Fragen haben wir diesmal einige 
herausgegriffen, die typische Pro¬ 
blemstellungen wiedergeben. Da¬ 
bei kommt auch ein Druckfehler 
aus HC 5/86 zur Sprache, der aus¬ 
gerechnet beim Patchen zur Ver¬ 
zweiflung führen kann. Anstelle ei¬ 
nes FC ist an der Speicherstelle 
2E8C ,,1B“ einzugeben — wer 
hätte das gedacht. Und noch eine 
erfreuliche Mitteilung: Für den 
DIV/MOD-Fehler unter Turbo-Pas¬ 
cal Version 3.0 für CP/M 80 ist ein 
Patch gefunden worden, den wir in 
der nächsten Ausgabe vorstellen. 


CPC 664 mit Speichererweiterung 
von Data Media steigt beim Com- 
pilieren aus. Wie ist dem abzuhel¬ 
fen? 

Frage von Walter Ganter aus Dü¬ 
ren 

Nach Aufruf der Speichererwei¬ 
terung durch SYS und RUN 
,,TURBO“ passiert folgendes: Tritt 
beim Compilieren ein Fehler auf, 
der sich durch Rücksprung ins 
Turbo-Programm durch Drücken 
der ESC-Taste beheben lassen 
würde, so blockiert der Schneider 
CPC 664. Nur durch einen Kaltstart 
läßt sich das System wieder star¬ 
ten. Die in HC 5, Seite 86, vorge¬ 


schlagene Lösung funktioniert 
nicht, da ohne Speichererweite¬ 
rung die ESC-Taste eingesetzt 
werden kann. 

Die Lösung ist dennoch denkbar 
einfach: In HC 5/86 hat sich ein 
Fehler eingeschlichen. Es muß 
nicht in der Speicherzelle 1B der 
Wert in FC geändert werden, son¬ 
dern in der Speicherzelle 2E8C 
muß der Wert in FC 1B geändert 
werden (beim DDT üblichen Offset 
von 100 hexadezimal). 


Warum wird beim Schneider CPC 
6128 der freie Diskettenplatz 
falsch angegeben? 

Frage von Berthold Bollinger aus 
Hürth und Hans Maas aus Bre¬ 
men 

Wählt man beim CPC 6128 unter 
CP/M 3.0 im Hauptmenü die Funk¬ 
tion ,,D“ für „Directory anzeigen“, 
so erscheint unter dem Disketten¬ 
inhaltsverzeichnis nach der Mittei¬ 
lung „Bytes remaining on A:“ eine 
Zahl, die eindeutig nicht mit dem 
freien Speicherplatz überein¬ 
stimmt, sondern um etwa 64 KB 
darüber liegt. Das liegt daran, daß 
Turbo-Pascal an CP/M 2.2 ange¬ 
paßt wurde und die Version 3.0 
nicht ganz aufwärtskompatibel zur 
Version 2.2 ist. Der Fehler bei Be¬ 


rechnung des freien Speicherplat¬ 
zes wirkt sich jedoch nicht auf das 
Speichervermögen aus. Nur die 
Anzeige ist fehlerhaft. Dafür wurde 
bislang leider noch keine Korrektur 
gefunden. 


Kann Turbo-Pascal auch mit einer 
RAM-Disk Zusammenarbeiten? 

Frage von K. Leimer aus Düsseldorf 

Prinzipiell ist eine RAM-Disk nichts 
anderes als ein Teil des Hauptspei¬ 
chers, der wie ein Disketten-Lauf- 
werk angesprochen wird. Es bietet 
sich daher sogar an, Turbo-Pascal 
nach Möglichkeit mit einer RAM- 
Disk Zusammenarbeiten'zu lassen. 
Da eine RAM-Disk keine mechani¬ 
schen Teile besitzt, ist das Schie¬ 
ben von Daten von und nach Disk 
viel schneller möglich als mit ei¬ 
nem herkömmlichen Laufwerk. 
Entscheidend bemerkbar macht 
sich dieser Vorteil, wenn viel mit 
Overlays und anderen nachladba¬ 
ren Programmteilen gearbeitet 
wird. Kleine Overlays stehen prak¬ 
tisch sofort zur Verfügung. Eins 
sollte jedoch bei der Arbeit mit 
RAM-Disks beachtet werden: Sie 
ist kein Permanent-Speicher, das 
heißt, alle Daten gehen beim Ab¬ 
schalten des Computers verloren, 
sofern sie nicht vorher auf eine Dis¬ 
kette oder Festplatte abgespei¬ 
chert wurden. Besonders elegant: 
alle wichtigen Programmteile beim 
Systemstart automatisch - zum 
stetigen Zugriff — auf die RAM- 
Disk zu schieben. 


Wie werden in Turbo-Pascal die 
BASIC-Befehle INP und OUT ge¬ 
schrieben? 

Frage von Raimund Pourvoyeuer 
aus Reutte 


Unter Turbo-Pascal gibt es ein 
vordefiniertes PORT-ARRAY, mit 
dem sich der Datenport des 8086/ 
88 ansprechen läßt. Über dieses 
Array können die Funktionen INP 
und OUT ersetzt werden. 
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Teil 6: Der richtige Einsatz von Prozeduren 


I n der letzten Folge unseres Pas¬ 
cal-Kurses haben wir den Um¬ 
gang mit Prozeduren kennen¬ 
gelernt. Darunter versteht man 
eine beliebige Folge von Anwei¬ 
sungen, die mit einem Namen auf¬ 
gerufen werden kann; das Prinzip 
ist in dem ,,Beipackzetter noch¬ 
mals dargestellt. 

Eine Reihe von Prozeduren sind 
bereits im Sprachumfang von Pas¬ 
cal enthalten. Beispielsweise ver¬ 
birgt sich hinter ..writeln“ ein der¬ 
artiges Unterprogramm. Im Ge¬ 
gensatz zu den vom Benutzer 
definierten Prozeduren sind bei 
dieser Druckprozedur jedoch Art 
und Anzahl der dem Unterpro¬ 
gramm übergebenen Werte (Para¬ 
meter) nicht festgelegt. 

Zur Erinnerung: Am Beispiel ei¬ 
ner Liste der Daten von Bundesli¬ 
gaspielern haben wir festgestellt, 
daß Programme durch Verwen¬ 
dung von Prozeduren übersichtli¬ 
cher geschrieben werden können. 


Schachteln 
von Prozeduren 

Eine Prozedur kann auch eine 
andere Prozedur aufrufen, wie das 
Beispiel „sortieren“ zeigt, in dem 
die Spieler nach einem bestimm¬ 


ten Merkmal sortiert werden kön¬ 
nen. Das Sortieren durch fortlau¬ 
fendes Vertauschen haben wir 
bereits näher erläutert. Das Sor¬ 
tierprogramm wird sehr viel über¬ 
sichtlicher, wenn man eine Proze¬ 
dur „vertauschen“ einführt, die im 
Bedarfsfall die gesamten Daten 
zweier Spieler austauschen kann. 

Im Vereinbarungsteil von „sor¬ 
tieren“ werden „index“ und 
„durchlauf“ als ganze Zahlen fest¬ 
gelegt. Danach wird die Prozedur 
„vertauschen“ erklärt. In der dazu¬ 


Gebrauchsinformation! 
Sorgfältig lesen! 

PROZEDUR® 


Eigenschaften: 

Zusammensetzung: 

Anwendungsgebiete: 

Nebenwirkungen: 

Besondere Hinweise: 


Ein seit vielen Jah¬ 
ren bewährtes Mit¬ 
tel gegen unstruk- 
turiertes Program¬ 
mieren. 

Mit Werte- oder 
Namensparame¬ 
tern in Klammem. 
Lange oder un¬ 
übersichtliche Pro¬ 
gramme. 

Vorsicht bei gleich¬ 
zeitiger Verwen¬ 
dung von globalen 
Variablen! 
Gelegentlich kön¬ 
nen unklare Feh¬ 
lersymptome durch 
Verwechslung von 
Werte- und Na- 
mensparametem 
auftreten. 


PROCEDURE sortleren(wonach:merkmal); 

(* Zum Einbau in das Programm 'bundes1iga'*) 

VAR index,durchlauf:integer; 

PROCEDURE vertauschen(a,b:integer); 

(* Vertauscht die Daten der Spieler mit den 
Nummern a und b *) 

VAR merkm : merkmal; 
tauschl : zkette; 

BEGIN 

FOR merkm:=name TO gebjahr DO 
BEGIN 

tauschl: =spieler.(a,merkm] ; 

spieler[a,merkm]:=spieler[b,merkm]; 

spieler[b,merkm]:=tauschl; 

END; 

END; (* von vertauschen *) 

BEGIN (* von sortieren *) 

FOR durchlauf:»1 TO spielerzahl DO 
BEGIN 

FOR index:=1 TO spielerzah1-1 DO 
BEGIN 

IF spieler[index,wonach]>spieler[index+1,wonach] THEN 
vertauschen(index,index+1); 

END; 

END; 

END; 


gehörenden Zeichnung wird die 
Schachtelung des gesamten Pro¬ 
gramms veranschaulicht. Alle 
Variablen von „sortieren" sind da¬ 
nach auch für die untergeordnete 
Prozedur „vertauschen“ global 
gültig. Dagegen kann die Prozedur 
„ausgabe“ nicht auf die Variablen 
von „sortieren" zugreifen, da „sor¬ 
tieren“ kein Unterprogramm von 
„ausgabe“ ist. Andererseits ist 
„tauschl“ nur lokal gültig im Un¬ 
terprogramm „vertauschen“. 
Durch den Aufruf sortieren(name) 
werden nun alle Spieler dem Na¬ 
men nach sortiert. Ebenso kann 
man auch durch sortieren(gebjahr) 
die Spieler dem Lebensjahr nach 
ordnen und anschließend ausge¬ 
ben lassen. 


Wert- oder 
Namensparameter? 

ln allen bisherigen Programmen 
haben wir jeweils feste Werte an ein 
Unterprogramm übergeben. Dies 
kann zu auf den ersten Blick merk¬ 
würdigen Effekten führen, wie das 
„parameterdemo“-Programm 
zeigt. 


PROGRAM Parameterdemo; 

(* Fehlerhaftes Programm *) 
VAR zahl:Integer; 

PROCEDURE quadrat(a:Integer); 
BEGIN 
a: =a*a; 

END; 

BEGIN 

wrlte(’Zahl eintippen! '); 
readln(zahl); 
quadrat(zahl); 
writeln( 'quadriert»zahl: 3); 
END. 


ln der Prozedur „quadrat“ wird 
offenbar die ganze Zahl a mit sich 
selbst multipliziert und das Ergeb¬ 
nis wieder a zugewiesen. Im 
Hauptprogramm müßte zu einem 
eingetippten Wert „zahl“ eigent¬ 
lich dessen Quadrat ausgedruckt 
werden. Der Beispielausdruck er¬ 
gibt aber: 

Zahl eintippen! 6 
quadriert = 6 

Wo liegt der logische Fehler? Die 
Prozedur faßt a als einen festen 
Wert und nicht als eine Variable 
auf. Daher kann durch a:=a*a 
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PROGRAM Wertetabelle; 

VAR x,xanfang,xende:real; 

xschritt :real; 

(* - 


FUNCTION f(s:real):rea 
BEGIN 

f:=4*s*s-4 
END; 

(* - 

BEGIN (* Beginn de 

write(*Anfangswert *) 
write('Schrittweite ’) 
write(’Endwert *) 

writeln; 

writeln( ’ Wertetabel 
writeln ( 1 x 

writeln ( ’- 

x:=xanfang; ( 

WHILE x<= xende DO 
BEGIN 

writeln(x:7:3,’ 
x:=x+xschritt; 

END; 

END. 


- *) 

1; (* Festlegung *) 
(* der Funktion*) 
(* namens f *) 
(* Ende d. Def.*) 
-*) 


s Hauptprogrammes *) 
;readln(xanfang); 
;readln(xschritt); 
;readln(xende ); 


le • ) 
f (x) 1 


) 


* Erster x-Wert*) 


\f 

( 


(x) : 7:3) ; 

* Neuer x-Wert *) 


die ganze Zahl a auch nicht verän¬ 
dert werden. Da wir dies aber errei¬ 
chen wollen, müssen wir das Un¬ 
terprogramm anweisen, a als 
Variable aufzufassen. Mit der ab¬ 
geänderten Vereinbarung proce- 
dure quadrat(var a:integer) ergibt 
sich tatsächlich das richtige Er¬ 
gebnis. Probieren Sie es aus! 

Es gibt also zwei verschiedene 
Arten der Parameterübergabe. 
Entweder wird nur ein Wert über¬ 
geben (Werteparameter), der von 
der Prozedur nicht geändert wer¬ 
den kann, oder der Parameter wird 
durch den Zusatz ,,var“ als Varia¬ 
ble erklärt. Im letzten Fall wird dem 
Unterprogramm gewissermaßen 
der Name des Parameters durch¬ 
gereicht (Namensparameter). Da¬ 
durch kann die Prozedur den Wert 
verändert an das rufende Pro¬ 
gramm zurückgeben. 

Doch nun zurück zu der Auf¬ 
gabe, die im letzten Teil gestellt 
wurden. Als Übungsaufgabe sollte 
eine Prozedur Joeschen“ erstellt 
werden. Wir wollen damit den 
Spieler mit der Nummer a aus der 
Liste entfernen. Dazu vertauschen 
wir einfach die Daten des Spielers 
mit der höchsten Nummer mit de¬ 
nen des zu löschenden Spielers. 
Für diesen Zweck bietet sich die 
bereits vorhandene Prozedur,.ver¬ 
tauschen“ an. Zum Schluß ernied¬ 
rigen wir die Anzahl der Spieler. 


PROCEDURE loeschen (a:integer); 
BEGIN 

vertauschen(a,Spielerzahl); 
spielerzahl:=spielerzah1-1; 
END; 


Dennoch scheitert der Versuch 
bereits beim Übersetzen: Der 
Compiler bemängelt, daß die Pro¬ 
zedur „vertauschen“ in „loe¬ 
schen" nicht erklärt ist. In der Tat 
haben wir „vertauschen“ nur in 
den Erklärungsteil von „sortieren“ 
eingebaut, weil dies für den ur¬ 
sprünglichen Verwendungszweck 
auch nur dort erforderlich war. 
Wenn man stattdessen „vertau¬ 
schen“ im Erklärungsteil des 
Hauptprogrammes einbaut, funk¬ 
tioniert das Löschen eines Spielers 
einwandfrei. Man muß also nicht 
nur die Datenstrukturen, sondern 
auch die Schachtelung der Proze¬ 
duren sorgfältig planen. 


Prozeduren 
mit Rückgabegarantie 

Bei einer Reihe von Programmen 
unseres Kurses ist uns schon ein 
Ausdruck wie „length(wort)“ be¬ 


gegnet, mit dem man die Anzahl 
der Buchstaben in der Zeichen¬ 
kette „wort“ bestimmen kann. Of¬ 
fenbar kann es sich dabei trotz der 
ähnlichen Schreibweise nicht um 
eine Prozedur handeln, da der 
Ausdruck keine Anweisung bedeu¬ 
tet, sondern wie eine reelle Zahl 
behandelt wird. Hier haben wir es 
mit einer sogenannten „Funktion“ 
zu tun, durch die einer Variablen 
ein Wert des einfachen Datentypes 
zugeordnet wird: 

Variable: wort -*- length(wort) 

Typ: Zeichen kette -*• integer length 
(wort) steht also für eine ganze 
Zahl. Damit sind auch Verknüpfun¬ 
gen wie 5 + length(wort) möglich. 
Würde es sich dagegen um eine 
Prozedur handeln, müßte sich 
stets ein Semikolon hinter dem 
Aufruf befinden. Im Verlauf unseres 
Kurses haben wir schon mehrfach 
von derartiger eingebauter Funk¬ 
tion Gebrauch gemacht. Vielleicht 
erinnern Sie sich noch: 

Sofern die Funktion „random“ in 
der entsprechenden Version im¬ 
plementiert ist, steht random(5) 
beispielsweise für eine Zufallszah! 
zwischen 0 und 5. Hinter 
random(zahl) steckt die Zuord¬ 
nung 

Variable: zahl-*■ random(zahl) 
Typ: integer-*- integer 
Ein weiteres Beispiel ist die im 
Sprachumfang vieler Pascal-Ver¬ 
sionen enthaltene odd-Funktion, 
die angibt, ob eine Integerzahl ge¬ 
rade ist. So steht odd(4) für „true“, 
während odd(27) „false“ ergibt. 
Durch die Funktion mit dem Na¬ 
men „odd“ wird also einer Zahl 
vom Typ Integer ein logischer Wert 
zugeordnet: 

Variable: zahl odd(zahl) 

Typ: integer-*- boolean 


Schnell noch ein nicht ganz ernst 
zu nehmendes Beispiel: 

Variable: Leser-*• HC 
Typ: interessiert-*- gut 
Aber wie bei den Prozeduren wol¬ 
len wir auch selbst Funktionen 
definieren. 

Mit diesem kleinen Programm 
kann man sich für die Funktion 
f(s):=4*s*s — 4 eine Werteta¬ 
belle ausdrucken lassen. Neu 
hieran ist die im Listing einge¬ 
rahmte Definition der Funktion mit 
dem Namen f, die wie bei Prozedu¬ 
ren auch im Erklärungsteil stehen 
muß. Diese Kopfzeile besagt, daß 
f(s) eine Zahl vom Typ „real“ ist. 
Beim Aufruf muß in der Funktions¬ 
klammer ebenfalls eine Komma¬ 
zahl stehen. Die Vereinbarung für f 
wird in der Druckanweisung am 
Ende des Programmes benutzt. 
Damit ergibt sich nach der Ein¬ 
gabe von Anfangswert, Schritt¬ 
weite und Endwert beispielsweise 
folgendes Druckbild: 

Wertetabelle 


X 

f(x) 

3.000 

32.000 

3.200 

36.960 

3.400 

42.240 

3.600 

47.840 usw. 


Auswerten 
von Meßreihen 

Einer Funktion können auch 
mehrere Parameter übergeben 
werden, wie das folgende Beispiel 
„funktionsdemol“ zeigt, bei dem 
zu eingetippten Meßwerten deren 
Mittelwert ausgedruckt wird. Die 
Kopfzeile der Funktion besagt, daß 
„mittelwert“ für eine Kommazahl 
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PROGRAM funktionsdemo1; 

TYPE Messzahl = 1..20; 

messwert = ARRAYCmesszah11 OF real; 

VAR messung : Messwert; 

messnr,messungszahl : messzahl; 

miwert s real; 

(*-*j 

FUNCTION Mittelwert (mess:messwert;n:messzah1):real; 

VAR nummertmesszahl; 

summe sreal; 

BEGIN 
summe:=0; 

FOR numner:=1 TO n DO (* Messwerte werden *) 

summes=summe+messCnummerl; (* addiert.Die Summe *) 
mittelwert:=summe/n; (# wird durch die Zahl *) 


END; (* der Messungen geteilt*) 

(* - *) 

BEGIN (* Beginn des Hauptprograrames *) 


write ('Zahl der Messwerten ’); 
readln (messungszahl); 

FOR messnr:=1 TO messungszahl DO 
BEGIN 

write (messnr:3,*. Wert:= ’); 
readln (messung!messnr1); 

END; (* Messwerte sind eingelesen *) 

miwert:= mittelwert(messung,messungszah1); 
writeln ('Mittelwert:= miwert:7:3); 

(* Nun noch eine mathematische Merkwuerdigkeit *) 

FOR messnml TO messungszahl DO 
messung!messnr]:=messung!messnr]-miwert; 
write ('Neuer Mittelwerte ’); 

writeln (mittelwert(messung,messungszahl):7:3); 

END. 



steht. Der durchgereichte Parame¬ 
ter ,,mess“ ist ein Array von n reel¬ 
len Zahlen. Im Hauptprogramm 
werden zunächst die Meßwerte 
eingelesen. Im Anschluß daran er¬ 
folgt der Aufruf der Funktion ,,mit¬ 
telwert“, deren Wert noch in einer 
besonderen Variablen ,,miwert" 
abgespeichert wird. 

Am Ende des Programms wer¬ 
den die Meßwerte dadurch geän¬ 
dert, daß jeweils die Differenz des 
Meßwertes zum Mittelwert genom¬ 
men wird. Hätten wir nicht zuvor 
die Variable ,,miwert“ eingeführt, 


müßte man für jede Differenz die 
Funktion ,,mittelwert“ aufrufen, 
was natürlich die Laufzeit des Pro¬ 
grammes verlängert hätte. Das Er¬ 
gebnis dieser zweiten Berechnung 
ist merkwürdigerweise für alle 
Meßreihen 0. Können Sie sich dies 
mathematisch erklären? 

Für die Funktionsschreibweise 
gibt es in Pascal allerdings einige 


wenige Ausnahmen, wie die Funk¬ 
tion ,,mod“, die zu zwei Integer¬ 
zahlen a und b den ganzzahligen 
Rest beim Teilen von a durch b an¬ 
gibt. So ergibt sich für a = 50 und 
b = 6 als Rest beim Teilen 2, denn 
50 = 6*8 + 2. Nach der bisherigen 
Grammatik müßte man dies eigent¬ 
lich als mod(50,6) bezeichnen. In 
Anlehnung an die mathematisch 
übliche Schreibweise benutzt man 
jedoch in Pascal 50 mod 6. Überle¬ 
gen Sie sich bitte, daß 60 mod 7 = 
4 ist! 


Prima Zahlen - 
Primzahlen 

Mit der mod-Funktion kann man 
schnell prüfen, ob eine Zahl durch 
eine andere teilbar ist. Dies ist 
dann der Fall, wenn der Rest bei 
der Division Null ist. Da 16 durch 2 
teilbar ist, gilt 16 mod 2 = 0. 

Eine weitere Ausnahme ist die 
Funktion ,,div“, mit der man das 
ganzzahlige Ergebnis bei Dividie¬ 
ren zweier Integerzahlen bestimmt. 
So ist 26 div 9 = 2 und 86 div 12 = 
7. Die Funktionen mod und div 
dürfen nur mit Parametern benutzt 
werden, deren Werte zwischen 0 
und 32767 liegen. Mit der Funktion 
mod läßt sich prüfen, ob eine Zahl 
eine Primzahl ist. Zur Erinnerung: 
37 ist beispielsweise eine Primzahl, 
da sie nur durch sich selbst und 1 
teilbar ist. Verabredungsgemäß ist 
übrigens 1 keine Primzahl. 

Die Funktion ,,primzahl“ ordnet 
jeder Zahl x den Wahrheitswert 
,,false“ oder ,,true“ zu, je nach- 


PROGRAM primzahlsuch; 

TYPE ganzzahl=l.,32767; 

VAR zahl,anfang,ende :ganzzahl; 

FUNCTION primzahl(xtganzzahl)Jboolean; 

(* Ist x eine Primzahl ? *) 

VAR teiler:integer; 

gefunden Jboolean; 

BEGIN 

gefunden:=false; 

FOR teiler:=2 TO x-1 DO 
IF (x MOD teiler)=0 THEN gefunden:=true; 

IF (gefunden=true ) OR (x=l) THEN 
primzahl:=false 
ELSE 

primzah1:=true; 

END; 

BEGIN 

write (*Primzahlsuche von *);read (anfang); 

write (’ bis *);readln(ende); 

writeln ('Folgende Zahlen sind Primzahlen:*); 

FOR zahl:=anfang TO ende DO 

BEGIN 

IF primzahl(zahl) THEN 
write (zahl:8); 

END; 

END. 
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dem, ob x prim ist oder nicht. Dazu 
werden alle denkbaren Teiler von 2 
bis x— 1 durchprobiert. Wenn unter 
diesen bei keinem der Divisions¬ 
rest 0 ist, handelt es sich um eine 
Primzahl. Das Programm läuft na¬ 
türlich schneller, wenn wir nur die 
Teiler von x bis (x div 2) prüfen, 
denn beispielsweise bei 37 kann es 
keinen größeren Teiler als 18 ge¬ 
ben. Noch ein Tip: Extrem schnell 
läuft das Programm, wenn man nur 
die Teiler von 2 bis Wurzel aus x 
prüft. Auf die mathematische Be¬ 
gründung des Verfahrens wollen 
wir hier aber verzichten. Dazu muß 
man nur schreiben: 
for teiler: =2 to trunc(sqrt(x)) do 
Dabei wird mit sqrt die Wurzel be¬ 
rechnet, deren Nachkommastellen 
mit trunc abgeschnitten werden. 
Dies ist wegen der erforderlichen 
Typgleichheit der Variablen in einer 
for-Schleife nötig. 


Lange Integerzahlen 

Im Programm longint (Abkür¬ 
zung von: long integers) wird ab¬ 
schließend noch einmal das Zu¬ 
sammenspiel von Prozeduren und 
Funktionen gezeigt. Dabei werden 
Integerzahlen mit bis zu 40 Stellen 
als Zeichenketten abgespeichert. 
Das zugehörige Hauptprogramm 
ist besonders übersichtlich und 
auf Anhieb lesbar. Man kann nicht 
nur Variablen, sondern auch Kon¬ 
stanten vereinbaren. Dies ge¬ 
schieht durch ,,const“. Dabei muß 
die Typangabe entfallen, denn der 
Pascal-Compiler erkennt bei¬ 
spielsweise aus der Vereinbarung 
,,const pi =3.1414daß mit pi 
eine Kommazahl gemeint ist. Der 
Wert einer Konstanten kann im lau¬ 
fenden Programm nicht geändert 
werden. Mit der Funktion val wird 


ein Stringausdruck in eine Zahl 
umgewandelt. Die Syntax ist in 
Turbopascal val (string, val, code), 
wobei die boolesche Variable 
,,code“ angibt, ob eine Umwand¬ 
lung möglich ist. ,,A34“ läßt sich 
nicht umwandeln! 

Die ebenfalls neu auftretende 
Funktion ,,copy“ ordnet einer Zei¬ 
chenkette einen Teil einer (ande¬ 
ren) Zeichenkette zu. So ist bei¬ 
spielsweise copy(e,4,5) eine Zei¬ 
chenkette, die aus 5 Buchstaben 


der Stringvariablen e, beginnend 
ab dem vierten Zeichen von e be¬ 
steht. In der Funktion ,,plus“ wer¬ 
den die Zahlen ziffernweise unter 
Berücksichtigung des Übertrages 
addiert. Als Aufgabe ist diesmal 
das Hauptprogramm von ,,prim¬ 
zahlsuch“ so umzuschreiben, daß 
nur dann eine Primzahl ausge¬ 
druckt wird, wenn die um zwei grö¬ 
ßere Zahl ebenfalls prim ist. Solche 
Zahlen wie 17 und 19 nennt man 
Primzahlzwillinge. Thomas Geise 


PROGRAM longint; 

{ Verarbeitet Integervariablen beliebiger Laenge 
(Voreinstellung durch ’null’ und 
’laenge’ : 40 Stellen .Enpfehlung:laenge<80 ). 

Die Zahlen werden ziffernweise als Zeichenketten 
bearbeitet und in der Zeichenkette stets 
rechtsbuendig abgespeichert. } 

CONST nul1= 

’0000000000000000000000000000000000000000 *; 

laenge=40; 

TYPE zah1=STRINGClaenge3 ? 

VAR zah11,zah12,zah13:zah1; 


PROCEDURE drucken(z:zahl); 

{Druckt die Zahl z mit fuehrenden Nullen} 
BEGIN 

writeln(z:laenge); 

END; 


PROCEDURE eingabe (VAR e:zahl); 

VAR b:zahl; 

BEGIN 

write()? 
e:=nul1; 
readln(b); 

e:=copy(e,1,laenge-length(b)) 

+ copyCb,1,length(b)); 

END; 

(- 

FUNCTION plus(a,b:zahl):zahl; 

VAR stelle:1,.laenge; 

Ziffer 1,Ziffer2,Ziffer3:integer; 
code,uebertrag,summe:integer; 
ergebnis:zahl; 

BEGIN 

uebertrag:=0; 
ergebnis:=nul1; 

FOR steIle:=laenge DOWNTO 1 DO 
BEGIN 

val(aCstelle3,ziffer 1,code); 
val(bCstelle 3,ziffer2,code); 
summe:=ziffer1+ziffer2+uebertrag; 
ergebnisCstelle3:=chr(48 +(summe MOD 10)); 
uebertrag:=sumae DIV 10; 

END; 

plus:=ergebnis; 

END; 

{- Hauptprogramm -} 

BEGIN 

writeln('Geben Sie zwei Summanden ein '); 

eihgabe(zahl 1); 

eingabe(zah12); 

zahl3:=plus(zahl1,zah12); 

drucken(zahl1); 

writeln (’+'); 

drucken(zah12); 

writeln (’='); 

drucken(zah13); 

END. 
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Fallen und Fehlerquellen in Pascal: Tabellenausgabe 


ln der zweiten Folge unserer 
Reihe, die typische Pascal-Fehler 
aufzeigt, geht es um Tabellen. Ge¬ 
nerell betrachtet ist die Ausgabe 
von Zahlen und Texten in Tabellen¬ 
form in Pascal ziemlich einfach zu 
bewerkstelligen. Es gibt bekannt¬ 
lich die hilfreiche Einrichtung von 
(optionalen) Formatangaben: 
nach einem Doppelpunkt wird die 
Gesamtlänge eines „Fensters“ an¬ 
gegeben, in welches der betref¬ 
fende Wert rechtsbündig eingetra¬ 
gen wird. Beispiel: Wenn die 
Integer-Variable Summe den Wert 
22627 hat, dann bewirkt die Anwei¬ 
sung WRITELN(Summe:8), daß ein 
„Fenster“ mit 8 Stellen ausgege¬ 
ben wird, wir symbolisieren dies 
als Kasten: 


Der betreffende Wert 22627 wird 
daher in der folgenden Weise aus¬ 
gegeben: 


...22627 


(Natürlich erscheinen weder der 
Kasten noch die Punkte tatsächlich 
in der Ausgabe.) 

Sinngemäß gilt dasselbe auch für 
Texte (Strings) und für Real-Zahlen 
(siehe auch „Pascal-Lernen mit 
HC“, Teil 2 Heft 5/1986). Bei Real- 
Zahlen ist außerdem zu beachten, 
daß die Anzahl der Nachkomma¬ 
stellen durch eine weitere Angabe 
spezifiziert werden kann. Hat zum 
Beispiel die Real-Variable x den 
Wert 61.72, dann führt die Anwei¬ 
sung (WRITELN)(x:8:3) zu der fol¬ 
genden Ausgabe: 


..61.720 


Aber auch mit dieser bequemen 
Hilfe zum Formatieren können dem 
Programmierer Fehler unterlaufen. 
Wir werden uns mit zwei Proble¬ 
men beschäftigen, die sich häufig 
stellen. 

Problem 1: 

Die Rangliste eines Sportclubs soll 
ausgegeben werden. Die ge¬ 
wünschte Form ist: 


Name 

Rang 

Bauer, A. 

8 

Bauer, W. 

6 

Gruber 

13 

Zechler 

9 


Wir nehmen an, daß insgesamt 15 
Personen zu berücksichtigen sind 
und daß die Namen alphabetisch 
geordnet in einem ARRAY[1 . . 15] 
OF STRING[20] vorliegen, die da¬ 
zugehörigen Rangplätze sind in ei¬ 
nem ARRAY[1 . . 15] OF INTEGER 
zu finden. Die ARRAY-Variablen 
heißen Name und Rang. 

Es wird behauptet, daß die fol¬ 
gende Anweisungsfolge die ge¬ 
stellte Aufgabe löst: 


WRITELN(’NAME Rang’); 

WRITELNC . ’); 


FOR i: = 1 TO 15 DO 
WRITELN(Name[i]: 20, Rang 
[i] :4); 


Das Ergebnis gleicht jedoch nicht 
ganz dem Erwünschten. Wieso? 


Problem 2: 

In einer Tabelle sollen Real-Zah¬ 
len in einer Spalte angeordnet wer¬ 
den, wobei das Dezimalkomma tat¬ 
sächlich als Komma (und nicht als 
Punkt) zu schreiben ist. Konkreter 
Fall: In einem ARRAYfl . .8] OF 
REAL, das den Namen Betrag hat, 
sind DM-Beträge gespeichert, die 
in einer Tabelle der folgenden 
Form ausgegeben werden sollen: 


Tageseinnahmen 

Kasse 1: 

606,23 DM 

Kasse 2: 

461,08 DM 

Kasse 3: 

509,71 DM 

Kasse 8: 

495,10 DM 


Zur Bearbeitung dieser Aufgabe 
wird das folgende Programmstück 
angegeben: 


WRITELN(Tageseinnahmen'); 

WRITELNC . ’); 

FOR i: = 1 TO 8 DO 
BEGIN 

WRITE(’Kasse’,i :2,’:’); 
WRITE(TRUNC(Betrag[i] :5,’,’) 

WRITE(ROUND(100*(Bet- 
rag[i]-TRUNC( Betrag [i]))) :2); 
WRITELN(’DM’:3) 

END; 


Auch dieses Programmstück erfüllt 
d|e gestellte Aufgabe nicht zufrie¬ 
denstellend. (Um genau zu sein, 
es erfüllt sie nur in neun von zehn 
Fällen.) Wo liegt der Fehler? Die 
Antworten finden Sie wieder auf 
der letzten Seite von HC-Extra. 


Turtle-Grafik mit 


Schneider CPC 


Schon mit kleinen Programmen 
kann man durch Veränderung von 
Parametern eine Vielzahl geometri¬ 
scher Muster erzeugen. Das fol¬ 
gende Beispiel ist in Turbo-Pascal 
für Schneider CPC geschrieben 
und erfordert die eingebundenen 
Include-Dateien auf der Diskette. 
Es läßt sich jedoch sehr leicht auf 
andere Systeme und Sprachen mit 
Turtle-Grafik übertragen. Dem ab¬ 


gedruckten Programmlisting ent¬ 
nimmt man das einfache Konstruk¬ 
tionsschema. Dazu wird die 
Schildkröte um eine bestimmte 
Strecke (’laenge’) in der eingestell¬ 
ten Richtung bewegt und anschlie¬ 
ßend um einen festen Winkel ge¬ 
dreht. Danach wird die eingestellte 
Länge durch Addition eines festen 
Wertes ’delta’ vergrößert und der 
Vorgang kann von Neuem begin¬ 


nen. Die Anzahl der Wiederholun¬ 
gen läßt sich durch den Zahlenwert 
von 'schritte’ steuern. In der fol¬ 
genden Tabelle sind Werte für se¬ 
henswerte Grafiken, wie die auf 
Seite 63, zusammengestellt. 
Drehwinkel 182 60 150 145 

Schrittzahl 180 180 180 80 

Laenge 0 5 5 180 

Laengenän- 2120 
derung 
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PROGRAM »Ultibild; 

<$I grafik3.inc> {Enthaelt Grund- und> 

{♦I turtle3.inc} {Turtlegraphik fuer > 

{SCHNEIDER CPC } 

VAR Winkel : integer; 
delta : integer; 
laenge * integer; 
schritte t integer; 
nummer : integer; 

BEGIN 

write(’Drehwinkel ? ’); readln (Winkel); 

write(’Schrittzahl ? ’); readln (schritte); 
write(’Startlaenge ? *); readln (laenge ); 
write(’Laengenaenderung ? *); readln (delta); 

Bildschirmmitte } 

Schirm loeschen. > 

do 

Geradeaus } 

Rechtsdrehung > 

Laengenaenderung ) 


setposition(0,0); { 

clearscreen; { 

for nummer:=1 to schritte 
BEGIN 

forwd(laenge); { 

turnright(winkel); { 


laenge:=laenge+delta; i 
END; 

END. 


Vielfältige Kombinationen 

Mit diesem Programm lassen 
sich auch bekannte geometrische 
Figuren wie beispielsweise das 
Quadrat erzeugen. Versuchen Sie 
es! Schwieriger ist schon der Kreis, 
den man jedoch mit den Werten 



1,360,2,0 erhält. Hinter diesen Zah¬ 
len verbirgt sich das Konstruk¬ 
tionsverfahren. 

Für besonders experimentier¬ 
freudige Programmierer noch ein 
Tip: Wandeln Sie das Programm in 
eine Prozedur ’figur’ um, der alle 
bisherigen Parameter sowie die 
Koordinaten des Anfangspunktes 
für ’setposition’ übergeben wer¬ 
den. Dann kann man durch unter¬ 
schiedliche Aufrufe von ’figur’ ein 


Mastermind und die 

Eines der Argumente, die als 
Vorteil des Programmierens in 
Pascal grundsätzlich angeführt 
werden, ist die Übertragbarkeit auf 
andere Rechner. Steht der Anwen¬ 
der dann jedoch vor dieser Auf¬ 
gabe, so ist von Kompatibilität oft 
nicht viel zu spüren. Eines der auf¬ 
tretenden Probleme ist die Zuord¬ 
nung des Dateinamens auf Dis¬ 
kette oder Platte zu einem formalen 
Namen im Programm. Da Stan¬ 
dard-Pascal hierzu keinerlei Mittel 
bietet, haben die Compiler-Ent¬ 
wickler eigene Lösungen erarbei¬ 
tet. So fragt MS-Pascal selbstän¬ 
dig beim Start des Programmes 
alle Dateizuordnungen ab, Turbo- 
Pascal erwartet eine spezielle An¬ 
weisung zur Dateizuweisung. 

Es gibt aber nach dem Standard 
von Wirth keine Möglichkeit, diese 
sehr implementationsabhängigen 
Lösungen allgemeingültig zu er¬ 
setzen, so daß man hier mit Unver¬ 
träglichkeiten leben muß. Ein wei¬ 
teres Beispiel zeigt dagegen ver¬ 
meidbare Inkompatibilitäten, näm¬ 
lich eine Umdefinition einer 
festgelegten Standardfunktion: 
Bei Verwendung der Funktion 
FRAC kommt es bei manchen 
Compilern zu Problemen, wenn 


Gesamtbild aus einzelnen Graphi¬ 
ken konstruieren. Vergessen Sie 
aber bitte nicht die Beseitigung 
von 'clearscreen’, da ansonsten 


der Bildschirm nach jeder Einzel¬ 
zeichnung gelöscht wird. Viel Spaß 
beim Experimentieren! 

Thomas Geise 


Übertragbarkeit von Pascal-Programmen 


program masterrnind ( input, out put) ; 

const zeilenlaenge = 40; 

Zeilenzahl = £5; 

type zah1 = 0- . 9; 

zahlfeld = arrayC1. . 41 of zahl; 
bearb«rtyp = arrayCl.>4D of boolean; 


var treffer, 

volltreffer 
versuch, 
loesung 
anz^-versuche, 
index: 
ver«*stelle, 

1 oet-st e 1 le 
startwert 
v-^bearbeitet, 
l^bearbeitet 


0. .4; 

zah1feld; 

integer; 

1. .4; 
real; 

bearb«-typ; 


procedure cls; 
begin 

for indexs=l to Zeilenzahl do writeln 
end; 

procedure sternchendrucken; 

begin 

for indexs=l to zeilenlaenge do writeC’* 1 ) 
end; 

function Zufalls real; 
var hi1fswertsreal; 

function frac ( a s rea 1) s rea 1 ; 
begin 
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dort anstelle des laut Standard zu 
liefernden Integerwertes der Com¬ 
piler ein Real-Ergebnis liefert, da 
dann unverträgliche Typzuweisun¬ 
gen entstehen. (Falls dieser Fehler 
auftritt, ist es ratsam, im Handbuch 
nach einer speziellen Funktion zu 
suchen, die Realwerte in Integer¬ 
werte umwandelt.) 

Um Probleme wie die hier be¬ 
schriebenen zu vermeiden, sollte 
so weitgehend wie möglich , ein 
dem Standard entsprechender Be¬ 
fehlsatz verwendet werden. 

Doch was ist der Standard? 

Als Standard kommen im Wesentli¬ 
chen zwei Festlegungen in Frage: 
der ursprüngliche Wortschatz, der 
von Wirth und Jensen im 'PASCAL 
user manual and report’ festgelegt 
wurde und der neuere ISO-Stan- 
dard. Im weiteren ist, wenn nicht 
anders angegeben, die Wirthsche 
Festlegung gemeint, deren Um¬ 
fang im Bild dargestellt ist. Es soll 
an dieser Stelle noch einmal daran 
erinnert werden, daß jeder Compi¬ 
ler diesen Sprachumfang verarbei¬ 
ten sollte, jedoch muß er in allen 
weiteren Worten nicht unbedingt 
einen Sinn erkennen. Es sei aus¬ 
drücklich darauf hingewiesen, daß 
etwa die im Kurs beschriebenen 
Funktionen ’length’, ’pos’ und so 
weiter Turbo-Pascal-Schöpfungen 
sind und somit auch nur dort in der 
beschriebenen Weise wirken. 

Der hier diskutierte Standard ist 
auf den ersten Blick zum Teil recht 
unbefriedigend, so ist es zum Bei¬ 
spiel lästig, daß Pascal den Daten¬ 
typ ’string’ nicht kennt. Doch man 
kann ja ebensogut ein ARRAY . . 
OF CHAR mit entsprechenden 
Grenzen wählen, etwa 0 . . 80. 

Dazu kann marr sich die Proze¬ 
duren und Funktionen zur Eingabe 
und Ausgabe selbst schreiben, 
was allerdings etwas aufwendig ist. 
Hat man sich jedoch einmal die 
Mühe gemacht, so kann man diese 
bei Bedarf leicht in den Quelltext 
einbauen und das Programm 
bleibt übertragbar. 

Außerdem lernt man beim Erstel¬ 
len der Prozeduren und Funktio¬ 
nen Pascal außerordentlich gut 
kennen . . . 


Relativ einfach ist die Ausgabe von 
Zeichenketten zu erreichen, die 
man als PACKED ARRAY . . OF 
CHAR deklariert hat. Beispiel: 

VAR A: PACKED ARRAY [1 . . 20] 
OF CHAR; . . . 

WRITELN (A); 

gibt alle 20 Buchstaben des Arrays 
aus, wobei sicherzustellen ist, daß 
diesen auch sinnvolle Werte zuge¬ 
wiesen worden sind. Es ist also 


nicht notwendig, alle Elemente 
einzeln durch Nennen der Indices 


frac:=a-trunc(a) 

end; 
begin 

hilfswert:=frac(9Q21*startwert+0.£11327); 
startwert:=hi1fswert; 

Zufall s=frac(10*hi1fswert) 

end; 

begin 

cls; 

sternchendrucken; 

writeln (’ ZAHLENRATEN 0 - 9M ; 

sternchendrucken; 
writeln; 

writeln(’Gib Startwert vor’); 
readln (startwert); 

cls; 

for loe<e-stelle := 1 to 4 do 
begin 

loesungCloe+stelleis= zufall 

end; 

anz<-versuche s= 0; « 

repeat 

treffer := 0; 

Volltreffer := 0; 
anzfversuche := anz«-versuche + 1; 

for verstelle := 1 to 4 do 

begin 

v^-bearbeitet Everestel lei s = false; 

1 «-bearbeitet Everestel lei :=false 

end; 

writeln; 

writeln(’Gib Deinen Versüch ein (0. .9) : M; 

for ver+stelle := 1 to 4 do 
begin 
writeln; 

write <ver*stel le, 1 . Zahl :M; 
read ln(versuch Everestellei) 

end; 

for ver*steile := 1 to 4 do 

begin 

if (loesung Ever«rstel lei = 
versuch Ever^stellei) 

then 

begin 

volltreffer:=volltreffer+1; 
v^bearbeitet Ever^stellei:=true; 
l<r bearbeit et dver«-stel lei : =t rue 

end 
end; 

for ver*steile := 1 to 4 do 
for loe<-stelle : = 1 to 4 do 
begin 

if ((loesung Eloe«-stel lei = 
versuch Everestellei ) 
and (not v* bearbeit et Ever<rstel lei) 
and (not 1 ^bearbeitet Eloe<-stel lei) ) 

then 

begin 

treffer:=treffer+1; 

v^bearbeitetEverestelleis =true; 

l^bearbeitet Eloe+stellei:=true 

end 
end; 

cls; 

sternchendrucken; 
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writelnC’ AUSWERTUNG ’ , anz<-versuche:9) ; 

sternchendrucken; 
writeln;writeln; 

for ver*stelles=1 to 4 do write(versuchCver^stelleDs3); 
writeln;writeln; 

write (’ Volltreffer s’,volltreffers2); 
writeln<* Treffer :’,treffer:2); 

unti1 Volltreffer = 4; 

writeln; 

writeln<’Die Zahlenfolge ist richtig 
writeln; 

writeln(’Du hast ’ , anz<-versuche:3, 

’ Versuche gebraucht ! ’ ) ; 

writeln 

end. 


Sprachumfang von Pascal nach Wirth 


Operatoren 

; — 

+ 

_ 

* 

div 

mod 

/ 

= 

< 

< = , 

< 

< = 

< > 

and 

or 

not 

in 




Standardbezeichner 

Konstanten: 




false 

true 

maxint 


Typen: 




integer 

boolean 

real 

char 

text 




Parameter: 




input 

output 



Funktionen: 




abs 

eoln 

pred 

succ 

arctan 

exp 

round 

trunc 

ehr 

In 

sin 


cos 

odd 

sqr 

' 

eof 

ord 

sqrt 


Prozeduren: 




get 

new 

pack 

page 

put 

read 

readln 

reset 

rewrite 

unpack 

write 

writeln 

reservierte Worte 

and 

end 

nil 

set 

array 

file 

not 

then 

begin 

for 

of 

to 

case 

function 

or 

type 

const 

goto 

packed 

until 

div 

if 

procedure 

var 

do 

in 

program 

while 

downto 

label 

record 

with 

eise 

mod 

repeat 



auszugeben! Ebenso einfach läßt 
sich etwa durch mehrfaches Sen¬ 
den eines CHR(IO) ( = Linefeed) 
ein Bildschirmlöschen bewirken, 
ohne daß man auf spezielle Steu¬ 
erzeichen zurückgreift oder 
Spracherweiterungen benutzt. 


Es ist also durchaus möglich, mit 
den Sprachmitteln des Standards 
auszukommen, wenn man nicht 
gerade Systemprogrammierung im 
Sinn hat. 

Um an einem Beispiel-die Umset¬ 
zung einer einfachen Aufgabe in 


Pascal darzustellen, habe ich das 
Spiel ’Mastermind’ gewählt, da es 
durch einen hohen Bekanntheits¬ 
grad keine weiteren Erläuterungen 
erfordern dürfte. Es geht dabei 
darum, Farben in der richtigen Rei¬ 
henfolge zu erraten. Dabei habe 
ich konsequent alle Spracherwei¬ 
terungen vermieden, um zu zei¬ 
gen, daß es auch ohne spezielle 
Tricks möglich ist, sich die ent¬ 
sprechenden Routinen selbst zu 
schreiben. 

Der Algorithmus zur Erzeugung 
der Zufallszahlen wurde der HP65 
Anwenderbibliothek entnommen, 
er stammt von Don Malm und sei 
zur weiteren Verwendung wärm- 
stens empfphlen. 

Das dabei' verwendete Verfahren 
erfordert die Eingabe eines Start¬ 
wertes für die Zufallszahl zwischen 
0 und 1, alle weiteren ’Zufallszah- 
len’ werden daraus abgeleitet; es 
sollte daher nicht mit 0 begonnen 
werden. Volker Mühlhaus 

Rechnen leicht 
gemacht 

Es ist schon etwas aberwitzig, 
einen Computer zu benutzen und 
für Rechenoperationen dann doch 
zum Taschenrechner zu greifen. Ist 
es nicht sinnvoller, sich ein kleines 
Taschenrechner-Programm zu 
schreiben und dieses fortan zum 
Addieren wie zum Wurzelziehen zu 
verwenden? 

Die Antwort ist ein eindeutiges 
Nein. Wer auf Rechengenauigkeit 
auch bei sehr großen oder kleinen 
Zahlen Wert legt, dem bleibt gar 
nichts anderes übrig, als sich auf 
einen hochwertigen Taschenrech¬ 
ner zu verlassen. Eine vergleichbar 
hohe Rechengenauigkeit kann bei 
Home-Computern nur mit pro¬ 
grammiertechnischen Klimmzügen 
erreicht werden. Außerdem macht 
sich der eingeschränkte Rechen¬ 
bereich unangenehm bemerkbar. 
Die meisten Taschenrechner erfas¬ 
sen Zahlen mit bis zu 99 Stellen, 
beim Computer sind es ohne große 
Tricks gerade ein Drittel soviel. 

Ein anderer Punkt ist die Ge¬ 
schwindigkeit. Auch in diesem 
Punkt ist der Fachidiot Taschen¬ 
rechner dem heimischen Compu¬ 
ter meist überlegen. 

Das heißt aber nicht, daß die Re¬ 
chenmaschine Computer ihre urei¬ 
genste Aufgabe nicht erfüllt und im 
Rechnen schwach ist. Ein Beweis 
ist das vorliegende Programm, 
dessen Geschwindigkeit in erster 
Linie von der Schnelligkeit des 
Bildschirmaufbaus abhängt, so¬ 
fern es wie geschehen unterTurbo- 
Pascal eingesetzt wird. 
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PROGRAM taschenrechner; {HC-EXTRA, Dieter Winkler, 7.7.86) 

VAR zahll,zahl2 : real; 

ergebnis : real; 

k : char; 

PROCEDURE abstand; 

BEGIN; 

uriteln; writeln; writeln; writeln; writeln; 

END; 


( 


Simulation eines 


BEGIN 
clrscr; 
writeln 
writeln (' 
writeln; 

writeln ('Zahlen jeweils abschliessen mit: (RETURN) ’ ); 

write (’Der Druck auf die (RETURN)-Taste ersetzt dabei’): 
writeln (’ das Gleichheitszeichen’); 
abstand; 

write(’l. Zahl eingeben 
ergebnis : = zah1 1; 

REPEAT 

zahl2 := 0; 
abstand; 

write('Operation eingeben 
read(kbd,k); 
wr i te(k ) ; 


Taschenrechners*): 


’);readln(zah11): 


{Rechenschleife) 


) 


abstand; 
write(’2. 
IF k 


IF 

IF 

IF 

IF 

IF 

IF 

IF 

IF 

IF 

IF 


Zahl 
= ’ + ’ 
_ »_ i 

= * * ’ 
_ ♦ . » 

= ’q’ 

= ’w* 
= ’s’ 
= *c ’, 
= ’a’ 
= ’e * 
= ’ 1 * 


eingeben 


THEN 

THEN 

THEN 

THEN 

THEN 

THEN 

THEN 

THEN 

THEN 

THEN 

THEN 


clrscr; 
writeln 
writeln 


ergebnis 
ergebnis 
ergebnis 
ergebnis 
ergebnis 
ergebnis 
ergebnis 
ergebnis 
ergebnis 
ergebnis 
ergebnis 


’ ) ;readln(zah12); 
zahll + zahl2; 
zah1 1 - zah12; 
zah11 * zah12; 
zah11/ zah12; 
SQR(ergebnis); 
SQRT(ergebnis); 
SIN(ergebnis); 
COS(ergebnis); 
ARCTAN(ergebnis); 
EXP(ergebnis); 
LN(ergebnis); 


(’Fuer Ende als Operation eingeben: x (RETURN)’) 
(* Neustart: r ’ ) ; 

abstand; abstand; 

write (zahll:8:4,’ ’,k,zah12:8:4,’ =*,ergebnis:8:4); 
zahl l:=ergebnis; 

UNTIL k= *x* 


END. 


Die Aufgabenstellung: Mit mög¬ 
lichst wenig Aufwand sollen die 
Grundfunktionen eines sich selbst 
dokumentierenden Taschenrech¬ 
ners simuliert werden. Die Eingabe 
hat dabei dem üblichen Muster zu 
folgen. Mit einer kleinen Aus¬ 
nahme erfüllt das Programm diese 
Auflagen: Nach Eingabe der er¬ 
sten Zahl muß vor der gewünsch¬ 
ten Operation < RETURN > ge¬ 
drückt werden, außerdem hat 

< RETURN > das Gleichheitszei¬ 
chen ersetzt. Zum Beispiel muß 2 
plus 2 eingegeben werden wie: 

2< RETURN > +2< RETURN > 

Mit dem Ergebnis kann dann wie 
gewohnt weitergerechnet werden. 
Auch weitergehende Funktionen, 
wie die Bildung von Quadraten, 
sind ohne weiteres möglich, wenn 
als Operation das entsprechende 
Buchstabenkürzel — etwa q für 
quadrieren — eingegeben und mit 

< RETURN > als Gleichheitszei¬ 
chen quittiert wird. 

Die Funktionen des Programms 
entsprechen dabei denen von 
Standard-Pascal, wie ein Blick auf 
die Tabelle auf Seite 65 beweist. 
Nicht dem Standard entspricht 
CLRSCR; diese Prozedur kann 
aber problemlos eingebaut wer- 
deh: 

procedure clrscr; 

begin 

write <chr<12> > ; 

end; 

Im einzelnen verfügt das Pro¬ 
gramm über Funktionen zum Qua¬ 
drieren <q>, Wurzelziehen 
<w>, Potenzieren <e> und tri¬ 
gonometrische Grundfunktionen 
im Bogenmaß. -dw 


Lösungen zu S. 62 

Lösung zu Problem 1: Die Anwei¬ 
sungsfolge führt zu einer Tabelle 
der Gestalt 


Name 

Rang 


Bauer,A. 8 
Bauer,W. 6 
Gruber 13 


Zechler 9 


Wir sehen, daß die Namen rechts¬ 
bündig in 20 Stellen breite Fenster 
gesetzt werden, gefordert ist aber 
die linksbündige Anordnung. Um 
diese zu erzielen, kann jeweils der 
Name ohne Formatangabe ausge- 
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geben werden, gefolgt von einer 
variablen Anzahl von Leerstellen. 
Deren Anzahl ist 20 minus der 
Länge des Namens. Eine Lösung 
des gestellten Problems ist somit 
das folgende Programmstück: 


WRITE LN(’Name Rang 

’) ;WRITELN(’ .-. ’); 


FOR i: = 1 TO 15 DO 
WRITELN 

(Name[i],”:20-LENGTH(Name[i] 

,,RANG[i]:4); 


Lösung zu Problem 2: 

In dem angegebenen Programm¬ 
stück liegt ein subtiler Fehler ver¬ 
steckt. Die Anweisungsfolge ist nur 
ausreichend für alle Zahlen, deren 
Pfennigbetrag zweistellig ist. Wenn 
jedoch z. B. 461,08 auszugeben ist, 
erscheint statt dessen 461, 8. Eine 
Lösung dieser Schwierigkeit be¬ 


steht darin, solche Fälle getrennt 
zu berücksichtigen und die feh¬ 
lende 0 direkt zu ergänzen. Dies 
geschieht im folgenden Pro¬ 
grammstück, wobei der Übersicht¬ 
lichkeit halber zwei Hilfsvariable 
Mark und Pf vom Typ Integer be¬ 
nutzt werden: 


WRITELN(’Tageseinnahmen’); 

WRITELNC . '); 

FOR i: = 1 TO 8 DO 
BEGIN 

Mark: =TRUNC(Betrag[i]; 

Pf: = ROUND(100*(Betrag[i]- 
Mark)) 

WRITE(’Kasse’,i:2,’:’); 
WRITE(Mark:5); 

IF Pf < 10 THEN 
WRITE (’O’.Pf :1) 

ELSE WRITE(Pf:2); 
WRITELN(’DM’:3) 

END; 
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Riesige Prim¬ 
zahl gefonden 


Die große Beteiligung am 
Primzahl-Wettbewerb aus 
HC 5/86 hat gezeigt, daß wir 
mit unserem Vorhaben rich¬ 
tig liegen, den Lesern regel¬ 
mäßig Aufgaben zu stellen. 
Mit dem Einsendeschluß am 
15. Mai 1986 standen maxi¬ 
mal etwa vier Wochen zur 
Entwicklung des Program¬ 
mes und zur Bestimmung 
der Primzahl durch das Pro¬ 
gramm zur Verfügung. Wir 
hatten eigentlich vermutet, 
daß das Programm des Ge¬ 
winners an diese Zeitgrenze 
stoßen würde, also eine 
noch größere Primzahl ge¬ 
funden hätte, wenn mehr 
Zeit zur Verfügung gewesen 
wäre. 

Es kam aber anders: die 
größte Primzahl belegte mit 
16 354 Ziffern fast den gan¬ 
zen Speicher eines C64. Sie 
wurde von Joachim Pfefferle 
aus Balingen ermittelt, der 
mit dieser Leistung sich den 
Gewinn, einen Epson LX- 
90-Drucker, redlich verdient 
hat. Dazu brauchte ein Ma¬ 
schinenprogramm nur zirka 
neun Stunden. Bei einem 
größeren Speicher hätte 
dieser Leser mit dem glei¬ 
chen Programm leicht eine 
noch größere Primzahl er¬ 
mitteln können. Allerdings 
muß gesagt werden, daß mit 


einem weiteren Trick (Spei¬ 
cherung von zwei Ziffern in 
einem Byte) auch der Spei¬ 
cher des C64 für weitaus 
größere Primzahlen ausge¬ 
reicht hätte. Der Gewinner 
räumt dies und weitere Opti¬ 
mierungsmöglichkeiten 
selbst ein. 

Berücksichtigt wurden Ein¬ 
sendungen nicht, bei denen 
das Programm selbst gar 
nicht garantiert, ob die er- 
rechnete Zahl eine Primzahl 
ist. Wenn also zum Beispiel 
vorausgesetzt wurde, daß 
2132049 — -j ejne p r i mz ahl ist 
(was man in etlichen Bü¬ 
chern bestätigt finden kann) 
und das Programm dann 
nur unzählige Verdopplun¬ 
gen vornimmt und zum 
Schluß eins subtrahiert, 
dann war das nicht im Sinne 
des Aufrufs in HC 5/86. 
Trotzdem ist auch diese Pro¬ 
grammierleistung nicht 
ganz selbstverständlich, 
denn auch hier mußte (we¬ 
gen der Größe der Zahl) vom 
vorgegebenen Integer-For- 
mat des Rechners abgewi¬ 
chen werden und (aus Zeit¬ 
gründen) in Maschinen¬ 
sprache programmiert wer¬ 
den. Doch lassen wir jetzt 
den Gewinner mit seiner Lö¬ 
sungsmethode zu Worte 
kommen. -br 


Das Gewinner-Programm 


Bedienung 

Nach dem Laden und Star¬ 
ten wird sofort ein MC-Pro- 
gramm nachgeladen. Es er¬ 
scheint dann eine Frage: 
Hier können Sie eine Zahl 
kleiner als die maximal 
mögliche eingeben und das 
Programm gibt dann die 
Primzahl mit der nächstgrö¬ 
ßeren Zahl von Ziffern aus. 
Beispiel: Eingabe 100 - es 
erscheint eine Primzahl mit 
101 Ziffern. Durch Drücken 
der ,,P“-Taste kann das Pro¬ 
gramm unterbrochen und 
die aktuelle Primzahl ausge¬ 
geben werden. Erneutes 
Drücken einer Taste läßt das 
Programm fortfahren. Wenn 
bei der Ausgabe die Prim¬ 


zahl eine gewisse Länge 
überschreitet, wird die Aus¬ 
gabe unterbrochen. Fortset¬ 
zung durch Drücken der 
Leertaste. Um die größte 
Primzahl vom Programm 
ausgeben zu lassen, geben 
Sie eine Zahl größer oder 
gleich 16354 ein. 

Theorie 

Das Prinzip ist schnell er¬ 
klärt: Wenn man die ersten n 
Primzahlen miteinander 
multipliziert und dazu 1 ad¬ 
diert, so ist diese neue Zahl 
durch keine andere außer 
sich selbst und 1 teilbar, 
also eine neue Primzahl. 
Beispiel: 2 x 3 x 5 -f 1 = 
31 ist eine neue Primzahl. 
Jetzt braucht man nur noch 
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die ersten n Primzahlen, die 
wie folgt erzeugt werden: 
Mit 3 beginnend, wird jede 
ungerade Zahl daraufhin 
überprüft, ob sie durch eine 
Primzahl teilbar ist. Ist das 
nicht der Fall, so handelt es 
sich um eine Primzahl. 

Zum Programm 
Es besteht hauptsächlich 
aus drei MC-Routinen: der 
Multiplikationsroutine, der 
Ausgaberoutine und dem 
Programm zur Berechnung 
der nächsten kleinen Prim¬ 
zahl (siehe Theorie). Die 
kleine Primzahl-Routine be¬ 
ginnt bei $C810. Die kleinen 
Primzahlen werden als 2- 
Byte-Integers ab Adresse 
$6000 gespeichert. Die Mul¬ 
tiplikationsroutine multipli¬ 
ziert nun die kleine Primzahl 
Ziffer für Ziffer mit der gro¬ 
ßen. Nach dem Addieren, 
Übertrag addieren etc. steht 
dann das Ergebnis anstelle 
der alten Primzahl im Spei¬ 
cher (ab $1604 = letzte Zif¬ 
fer, pro Byte eine Ziffer). Für 
eine Primzahl muß noch 1 
zur letzten Ziffer addiert wer¬ 
den. Das erfolgt bei der 
Ausgabe. Im Speicher bleibt 
also das Multiplikationser¬ 
gebnis. 

Noch etwas zum Programm: 
Es mußte leider mit einem 
Monitorprogramm program¬ 
miert werden. Es gleicht da¬ 
her auch eher einem mittle¬ 
ren Chaos als einem gut 
strukturierten Programm. 
Zeitdauer für 1000 Stellen 


ca. 3 Minuten 

Zeitdauer für 7000 Stellen 
ca. 2,5 Stunden 
Zeitdauer für 16 000 Stellen 
ca. 9,0 Stunden 
Größte Primzahl 16354 Zif¬ 
fern ab $1604 (letzte Ziffer) 
im Speicher, pro Ziffer 1 
Byte. 

Leider konnte das RAM un¬ 
ter dem BASIC-ROM nicht 
genutzt werden - das Mo¬ 
nitorprogramm hat da nicht 
mitgespielt. Sonst wäre eine 
noch beträchtlich größere 
Anzahl von Ziffern möglich 
gewesen, allerdings nur mit 
sehr viel Geduld. 
Druckerausgabe 
Von BASIC aus kann man 
die Primzahl so ausdrucken: 
T = 256 * PEEK (49787) + 
PEEK (49786) 

FOR X = TTO 5637 STEP - 
1 

PRINT PEEK (X); = NEXT 
PRINT PEEK (5636) + 1 : 
REM = Letzte Ziffer + 1 
Wenn man nun vorher den 
Kanal zum Drucker öffnet mit 
OPEN 1,4 : CMD 1 
und hinterher mittels 
PRINT# 1 : CLOSE 1 
wieder schließt, müßte man 
die Zahl auf dem Drucker 
ausgeben können (siehe 
Programm). 

Im Programm kann man die 
Primzahl, nachdem sie auf 
dem Bildschirm ausge¬ 
druckt wurde, durch Drük- 
ken der ,,D“-Taste auf dem 
Drucker ausgeben. 

Joachim Pfefferte 


Die neueste Programm-Version 


Die maximale Stellenzahl 
beträgt jetzt etwa 28 280 
Stellen. Wir haben diese an¬ 
stelle des Gewinner-Pro¬ 
gramms hier abgedruckt. 


Ein kommentiertes Assem- 
bler-Listing und eine aktua¬ 
lisierte Beschreibung folgen 
im nächsten Heft. 

Joachim Pfefferle 


1 GOTO100 
5 : 

15 s 

20 : EIN PRIMZAHLENPROGRAMM VON 

30 : JOACHIM PFEFFERLE 

40 : ERZ INGER WEG 2 

50 s 7460 BALINGEN 

60 : 5/86 

70 : 

80 : 

100 REM BASICENDE HERABSETZEN 
110 P0KE55,255:P0KE56,21:P0KE51,255:POKE 
52,21 
120 : 

130 REM EVENT.DATA LESEN 

140 IFPEEK(49152)=!69ANDPEEK(49413)=124G 


OTO200 

150 FORX=49152T049637:READW:PQKEX,W :SU= 
SU+W :NEXT X 

160 IFSU<>67510THENPRINT"FEHLER IN DATAS 
!":END 
190 : 

200 POKE53280,11:REM FARBEN SETZEN 
210 P0KE53281,6 
220 P0KE646,13 
230 : 

300 INPUT"ANZAHL DER STELLEN";S 
310 SYS49152:P0KE249,0:POKE250,22 
330 PRINT"LiS": "STELLEN KLEINE 

PRIMZ.- 
335 : 

340 SYS49218 :REM HAUPTROUTINE 

450 T=256*PEEK(49787)+PEEK C49786):LA=T-5 

635 

550 KP=256*PEEK(49789)+PEEK(49788) 

560 IFLA >=SORKP >65510THEN1000 

570 PRINT"0";LA;" ";KP 

580 : 

600 GETA*:IFA*< >"P"THEN 680 

610 PR INT "ESSE]" : SYS49576: REM AUSGABE 

640 GETA*:IFA*=""ORA*=" "THEN640 

650 IFA*="D"THEN GOSUB 2000:GOTO640 

670 PRINT"UMSTELLEN KLEINE PR 

IMZ. " 

680 PQKE249,0:POKE250,22 
700 GOTO340 
710 : 

1000 PR I NT " ES": PR I NT: PR I NT " Li": SYS49576 
1010 PRINT: PRINTLA;"STELLEN" 

1020 GETA*:IFA*=""THEN1020 

1030 IFA*="D"THEN GOSUB 2000:GOTO1020 

1040 END 

2000 OPEN1,4:CMD1 

2010 FORX=T TO 5637 STEP-1 :PRINTRIGHT*( 
STR*(PEEK(X)),1);:NEXT 

2020 PRINTRIGHT*(STR*(PEEK(5636)+1),1) 
2030 PRINTttl:CLOSEI 
2050 RETURN 

5000 DATA169,22,133,250,169,0,133,249 
5002 DATA160,0,145,249,230,249,208,250 
5004 DATA230,250,165,250,201,160,208,236 
5006 DATA169,0,133,249,169,22,133,250 
5008 DATA169,0,162,32,157,105,194,202 
5010 DATA208,250,169,22,141,123,194,169 
5012 DATA4,141,122,194,169,3,141,132 
5014 DATA194,141,124,194,169,2,141,4 
5016 DATA22,234,120,160,4,162,0,189 
5018 DATA128,194,240,19,152,24,109,122 
5020 DATA194,141,122,194,169,0,109,123 
5022 DATA194,141,123,194,76,99,192,232 
5024 DAT Al36,208,228,160,0,177,249,141 
5026 DATA118,194,190,128,194,248,202,48 
5028 DATA33,240,24,24,109,118,194,202 
5030 DATA208,249,170,41,240,74,74,74 
5032 DATA74,24,109,117,194,141,117,194 
5034 DATA138,41,15,24,109,112,194,141 
5036 DATA112,194,216,200,192,5,208,205 
5038 DATA173,112,194,170,41,240,74,74 
5040 DATA74,74,248,24,109,117,194,141 
5042 DATA117,194,216,138,41,15,141,112 
5044 DATA194,173,116,194,160,0,145,249 
5046 DATA173,115,194,141,116,194,173,114 
5048 DATA194,141,115,194,173,113,194,141 
5050 DATA114,194,173,112,194,141,113,194 
5052 DATA173,117,194,141,112,194,162,0 
5054 DATA142,117,194,165,249,205,122,194 
5056 DATA240,9,230,249,208,2,230,250 
5058 DATA76,99,192,165,250,205,123,194 
5060 DATA208,240,173,116,194,240,12,238 
5062 DATA122,194,208,3,238,123,194,76 
5064 DATA226,192,234,24,173,124,194,105 
5066 DATA2,141,124,194,173,125,194,105 
5068 DATA0,141,125,194,169,0,141,1 
5070 DATA195,169,3,141,0,195,173,0 
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5072 DATA195,133,89,173,1,195,133,90 
5074 DATA173,124,194,133,87,173,125,194 
5076 DATA133,88,32,129,193,165,92,208 
5078 DATA4,165,93,240,198,165,88,208 
5080 DATA6,165,87,201,3,144,20,24 
5082 DATA173,0,195,105,2,141,0,195 
5084 DATA173,1,195,105,0,141,1,195 
5086 DATA76,30,193,173,124,194,133,87 
5088 DATA173,125,194,133,88,169,10,133 
5090 DATAB9,169,0,133,90,162,4,138 
5092 DATA72,32,129,193,104,170,165,92 
5094 DATA157,128,194,202,16,241,88,96 
5096 DATA234,162,0,134,92,134,93,160 


5098 DATA16,6,87,38,88,38,92,38 
5100 DATA93,56,165,92,229,89,170,165 
5102 DATA93,229,90,144,6,134,92,133 
5104 DATA93,230,87,136,208,227,96,234 
5106 DATA165,249,56,233,200,141,119,194 
5108 DATAl60,0,177,249,166,249,224,4 
5110 DATA208,6,166,250,224,22,240,31 
5112 DATA24,105,48,32,210,255,165,249 
5114 DATA208,2,198,250,198,249,173,119 
5116 DATA194,197,249,208,221,32,225,255 
5118 DATA201,239,208,249,76,178,193,24 
5120 DATA105,49,32,210,255,96 
READY. 



Adresse 

Das Gedächtnis des Rech¬ 
ners, der Speicher, besteht 
aus einer Unzahl von 
Schaltelementen, die ent¬ 
weder ein- oder ausge¬ 
schaltet sein können. Meh¬ 
rere dieser Elemente (-► 
Bit), bei Home-Computern 
sind es acht, sind zu einer 
Einheit (-* Byte) zusam¬ 
mengefaßt und über eine 
fortlaufende Nummer wie 
ein Haus in einer Straße auf¬ 
findbar, die Adresse. 
Schluckt der Prozessor des 
Computers jeweils acht Bit 
am Stück und verwendet er 
zweimal acht Bit für die 
Adressierung, kann er einen 
Adreßraum von 65536 Spei¬ 
cherzellen verwalten. 

Wieso? 8 bit können von 0 
bis 255 zählen, 
256* 256 = 65536. Dieser 
Wert entspricht 64 Kilobyte 
(KByte) und damit ist dann 
auch klar, warum Home- 
Computer hier die Grenzen 
ihres Wachstums finden. 
ASCII 

Mit dem Fernschreiber ging 
es los. Um Text zu übertra¬ 
gen, mußten die Schriftzei¬ 
chen in elektrische Impulse 
umgewandelt werden. Zu 
diesem Zweck ordnete man 
jedem Buchstaben, jeder 
Ziffer, jedem Zeichen, aber 
auch den Steuerfunktionen 
wie Papiervorschub, Glok- 
kensignal etc. einen Zahlen¬ 
wert.zu. 

Damit sich Fernschreiber 
verschiedener Hersteller 
verstehen konnten, mußte 
man sich auf einen Standard 
einigen, den American 
Standard Code for Informa¬ 
tion Interchange. Danach 


hat das ,,A“ zum Beispiel 
den Code 65, die Leerstelle 
hat den Code 32. 

Computer arbeiteten an¬ 
fangs mit Fernschreibern als 
Ein- und Ausgabegerät. So 
fand der ASCII-Code Ein¬ 
gang in die Elektronenhirne. 
Ursprünglich nurfür 128Zei¬ 
chen definiert (7 bit ASCII), 
werden heute meist 256 
Characters (8 bit) bestimmt. 
Ohne einheitliche Norm 
geht es da zumindest bei 
den Blockgrafikzeichen wie¬ 
der drunter und rüber. Und 
weil ASCII die Kommunika¬ 
tion zwischen Rechner und 
Drucker erst ermöglicht, 
können dann schwarz auf 
weiß Probleme auftauchen. 
BCD-Konstanten 
Die Abkürzung heißt ausge¬ 
schrieben: Binary Coded 
Decimal, binär codierte De¬ 
zimale und bezeichnet eine 
Methode, um Dezimalzah¬ 
len mit den Möglichkeiten 
des Rechners darzustellen. 
Statt die Dezimalzahl in ihr 
binäres Äquivalent umzu¬ 
rechnen, wird jede Ziffer der 
Dezimalzahl für sich in einen 
Binärwert gewandelt. Um 
Ziffer von 0 bis 9 darstellen 
zu können, werden vier Bit 
benötigt. In jeder 8-bit- 
Adresse können so zwei De¬ 
zimalziffern gespeichert 
werden. In einem weiteren 
Byte werden das Vorzeichen 
( + /-) und der Exponent 
(Stellen vor und hinter dem 
Komma) abgelegt. 

Die Länge der BCD-Kon- 
stanten bestimmt die Re¬ 
chengenauigkeit. Bei 4 Byte 
BCD können in drei Byte 
insgesamt sechs Dezimal¬ 
stellen erfaßt werden (einfa¬ 


che Genauigkeit), bei 8 Byte 
BCD (doppelte Genauigkeit) 
sind es schon vierzehn. 

Binär 

Binär oder dual heißt soviel 
wie ,.zweihaft“. Mathemati¬ 
ker bezeichnen damit ein 
Zahlensystem, das auf die 
Basis 2 bezogen ist, d.h. 
jede Stelle innerhalb einer 


Bit 

Binary digit, Binärziffer oder 
-stelle, bezeichnet ein Spei¬ 
cherelement, das zwei Zu¬ 
stände annehmen kann: 
Aus (0) oder Ein (1). Bit ist 
die kleinste Maßeinheit für 
Information, eine Ja/Nein- 
Entscheidung. 

Byte 

Die anfänglich für verschie¬ 
den große Zusammenfas- 


Dezimal 

Unsere vertraute Art, Zahlen 
zu notieren, ist das Dezimal¬ 
system. Es werden zehn Zif¬ 
fern von 0 bis 9 verwendet, 
die Stellung innerhalb der 
Zahl gibt der Ziffer den Stel¬ 
lenwert, eine entsprechende 
Zehnerpotenz (1, 10, 100 
usw.), die Ziffer bezeichnet 
den Faktor, also: 7351 meint 
7*10hoch3 (1000) + 

3*10hoch2 (100) + 

5 * lOhochl (10) + 

1*10hoch0 (1). Entspre¬ 
chend werden andere Zah¬ 
lensysteme aufgebaut, nur 
die Basis, beim Dezimalsy¬ 
stem 10, ändert sich. 

Flag 

Um bestimmte Zuständö zu 
kennzeichnen, zum Beispiel 


Binärzahl entspricht einer 
Zweierpotenz und es werden 
nur zwei Ziffern geschrie¬ 
ben. 

Dieses Zahlensystem er¬ 
möglicht dem Rechner ma¬ 
thematische Operatoren mit 
nur zwei Spannungszustän¬ 
den, Aus = 0 und Ein = 1, 
durchzuführen. 


sungen von Bit verwendete 
Bezeichnung binary trice ist 
zu einer festen Maßeinheit 
geworden: 8 bit = 1 Byte. 
Die heute noch üblichen 8- 
bit-Prozessoren verwalten 
Speicheradressen von je 8 
bit, 1 Byte ist also die klein¬ 
ste adressierbare Einheit, 
sie kann dezimale Werte von 
0 bis 255 annehmen (-* 
Adresse). 


ein angeschlossenes Peri¬ 
pheriegerät, einen aktivier¬ 
ten Bildschirmmodus, den 
Zustand eines Steuerknüp¬ 
pels (Joystick) werden in 
bestimmten Speicherplät¬ 
zen einzelne Bit gesetzt, 
also auf ,,1“ geschaltet. 

So kann beispielsweise 
durch das Setzen von Bit 4 
in Adresse 756 die doppelte 
Größe für Sprites einge¬ 
schaltet werden. Eine sol¬ 
che Markierung heißt Flag. 
Gesetzt 

Ein Bit ist gesetzt, wenn es 
den Wert 1 hat. Von BASIC 
aus ist das aber nicht ohne 
weiteres zu ermitteln, denn 
die kleinste adressierbare 
Einheit ist ein Byte, beste¬ 
hend aus acht Bit. 


Bit-tarade 


Nichts als Zahlen kennt der Computer oder genauer: nur die 
Zustände Aus (0) und Ein (1). Daß man trotzdem mit ihm 
rechnen kann, wird klar, wenn man eine Handvoll Fachchi¬ 
nesisch verstanden hat. Hier die wichtigsten Begriffe (Teil 1). 


Bit-Nummer 765432 10 

Bits (Beispiel) | llol o| llol l|i|o 


Binarwert 


2 7 2 6 2 5 2 4 2 J 2 2 2* 2° 


Bit-Nummer 7 6 5 4 3 2 1 0 

Bits (Beispiel) | 11 0 I 01 1 I 0 I 1 I l I 0 I 

Wertigkeit 128 64 32 16 » 4 2 1 
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AKTIV 

fV^OMPUIERN 


Ist Bit 4 in Adresse 756 ge¬ 
setzt? Der Inhalt von 756 
wird in dezimaler Form aus¬ 
gegeben: enthält zum Bei¬ 
spiel der Dezimalwert 186 
ein gesetztes viertes Bit? 

Um diese Frage zu beant¬ 
worten, muß BASIC den De¬ 
zimalwert (D) aufdröseln. 
Das kann je nach Dialekt 
etwa so aussehen: 

1000 FOR J=0 TO 

7:B(J) =0:NEXT J 
1010 IF D > 127 THEN 

B(7) = 1 :D = D — 128 
1020 IF D >63 THEN 

B(6) = 1 :D = D — 64 
1030 IF D >31 THEN 

B(5) = 1 :D = D —32 


1040 

IF 

D > 15 

THEN 

B(4) = 1 

:D = 

D —16 


1050 

IF 

D >7 

THEN 

B(3) = 1 

:D = 

D — 8 


1060 

IF 

D>3 

THEN 

B(2) = 1 

:D = 

D —4 


1070 

IF 

D»1 

THEN 

B(1) = 1 

:D = 

D — 2 


1080 B(0) = 

D 


Durch diese 

! Routine 

wird je- 


der Dezimalwert (von 0 bis 
255) in seine acht Bit (B(7) 
bis B(0)) zerlegt. Natürlich 
kann man die acht Zeilen 
auch in eine FOR-NEXT- 
Schleife packen, aber die 
dann nötigen vielen Poten¬ 
zen machen das Programm 
letztlich langsamer: 


1000 FOR J=7 TO 0 STEP -1 
1010 BCJ)=0:U=2 A J 
1020 IF D>U-1 THEN BCJ)=1 
:D=D—U 
1030 NEXT J 


Wenn aber nur der Zustand 
eines einzigen Bit gefragt 
ist, kann der durch eine For¬ 
mel überprüft werden. Um 
diese Formel zu verstehen, 
muß man sich das Verhält¬ 
nis der dezimalen Wertigkei¬ 
ten der einzelnen Bit deut¬ 
lich machen. 

Die Wertigkeit von Bit n ist 
genau doppelt so groß wie 
die von Bit n —1. Wird die 
Wertigkeit irgendeines hö¬ 
heren Bit durch die Wertig¬ 
keit irgendeines niedrigeren 
Bit geteilt, dann ist das Er¬ 
gebnis deshalb immer eine 
gerade Zahl. 

Wird eine Dezimalzahl also 
durch die dezimale Wertig¬ 
keit eines Bit geteilt und das 
Ergebnis ist eine gerade 
Zahl, dann ist nicht dieses, 
sondern irgendein höheres 
Bit gesetzt. Nur wenn das 
Ergebnis ungerade, näm¬ 


lich 1, ist, dann ist genau 
das gefragte Bit gesetzt. 

Die Formel muß also fol¬ 
gende Arbeitsschritte erle¬ 
digen: 

1: die Wertigkeit des Xten 
Bit berechnen (= 2hochX); 
2: den Dezimalwert D durch 
diese Wertigkeit teilen; 

3: von diesem Quotienten 
nur den ganzzahligen Teil 
(INT) berücksichtigen; 

4: feststellen, ob dieser Wert 
gerade ist. 

Eine Zahl ist gerade, wenn 
sie sich ohne Rest durch 2 
teilen läßt. Wird eine Zahl n 
durch 2 geteilt und die Divi¬ 
sion ergibt keinen Rest, 
dann ist sie gerade. Wenn 
also der Quotient n/2 gleich 
der Ganzzahl INT (n/2) ist, 
dann ist n eine gerade Zahl 
(ist doch klar, oder?). 

Die vollständige Formel lau¬ 
tet: 


INTCINTCD/2 A X)/2)< >INTCD/ 
2 A X)/2 


IF diese Formel erfüllt THEN Bit X = 1 (gesetzt). 

10 ? ”In welcher Adresse 
liegt das gesuchte Bit?”: 

r? 

20 INPUT A:D=PEEKCA):? :? 

30 ? "Den Zustand von wel 
ehern Bit C7 bis 0) wollen 
Sie wissen?”:? 


40 INPUT X 

50 IF INTCINTCD/2 A X>/2)< > 
INTCD/2 A X)/2 THEN B=1 
60 ? :? "In der Adresse ” 
;A;” ist Bit #”;X;”=”;B:? 
:? :? :GOTO 10 


Hex 

Das Hexadezimalsystem no¬ 
tiert Zahlenwerte zur Basis 
16. Es werden sechzehn Zif¬ 
fern benötigt: 0 bis 9, A, B, 
C, D, E und F. Jede Stelle in 
einer Hex-Zahl bedeutet 
eine 16er Potenz; also: 
3D1A entspricht 3 * 16hoch3 
-P 13*16hoch2 + 

1*16hoch1 + 10*16hoch0 
= 3 * 4096 + 13 * 256 + 
1 * 16 + 10*1 = 15642, de¬ 
zimal versteht sich. 
Invertieren 

Warum einfach, wenn’s auch 
ausländisch geht? Invertie¬ 
ren heißt umdrehen, ge¬ 
setzte Bit (1) sollen nicht ge¬ 
setzt (0) werden und umge¬ 
kehrt. 

Wenn Schriftzeichen negativ 
auf dem Bildschirm erschei¬ 
nen sollen, dann werden die 
Daten, die sie zur Darstel¬ 
lung bringen, invertiert. 
Beispiel: Ein Byte hat den 
Inhalt 01101101, der Rech¬ 
ner gibt das aber nur dezi¬ 
mal aus: 109. Wird das Byte 
invertiert, soll es den binä¬ 
ren Inhalt 10010010 bekom¬ 
men. Der ursrpüngliche Bi¬ 
närwert des Byte und der 
invertierte Wert ergeben ad¬ 
diert 11111111 oder dezimal 
255. 

109 -h Dl muß also 255 erge¬ 
ben oder 255 - 109 ergibt 
den Dezimalwert (Dl) des in¬ 
vertierten Byte, nämlich 146 
dezimal und das ist doch 
tatsächlich 10010010, binär. 
Kilo-Byte 

Die Bezeichnung Kilo meint 
üblicherweise 1000 Kilo¬ 
gramm: 1000 Gramm. Weil 
die Computertechnik nun 
aber einmal vom Dualsy¬ 
stem regiert wird und 
2hoch10 nun mal 1024 ist, 
bezeichnet ein Kilobyte 
(KByte) nun mal nicht 1000, 
sondern 1024 Byte. 

Maske 

Bit-Masken werden auf der 
Ebene von Maschinenspra¬ 
che verwendet, um festzu¬ 
stellen, ob bestimmte Bit 
gesetzt sind. Der Inhalt ei¬ 
ner Speicherzelle, z.B. 
10010110, wird mit der Bit- 
Maske z.B, 00110000, durch 
das logische AND verknüpft. 
Das Ergebnis ist ein Wert, 
bei dem nur die Bit ,,1“ sind, 
die sowohl in der Speicher¬ 
zelle als auch in der Bit- 
Maske gesetzt sind: 

Zelle 10010110 


Maske 00110000 

AND 

00010000 

Die Bit-Masken-Technik 
funktioniert nur, wenn Bit für 
Bit durch AND verknüpft 
wird. Deshalb ist sie aus BA¬ 
SIC heraus nicht anwend¬ 
bar, denn BASIC reicht nur 
an Byte nicht an Bit heran. 
Mega-Byte 

Die Vorsilben Mega be¬ 
zeichnen bei Maßangaben 
den Wert Million. Ein Mega¬ 
watt entspricht einer Million 
Watt, so wie Kilowatt tau¬ 
send Watt bedeutet. 

Da das Informationsmaß 
KByte nicht 1000, sondern 
1024 Byte bezeichnet, ist 1 
MByte entsprechend 

1 048 576, nämlich 1024 x 
1024 Byte. 

Muster 

Unter Bit-Muster versteht 
man die Anordnung gesetz¬ 
ter und nicht gesetzter Bit 
innerhalb eines Byte. Er¬ 
setzt man gesetzte Bit durch 
leuchtende Punkte auf dem 
Bildschirm oder druckende 
Punkte beim Nadeldrucker, 
wird der Name restlos ver¬ 
ständlich. 

Jeder dezimale Werte reprä¬ 
sentiert ein Bit-Muster. Mit 
acht Byte kann eine Bildflä¬ 
che von 8 x 8 Punkten erfaßt 
werden. Die Darstellung ei¬ 
nes Zeichens auf dem Bild¬ 
schirm benötigt deshalb 
acht Byte: 


Bill 7 6 5 t J 2 I 0 

Oez. 121 tt 32 K 8 t 2 I 


r 


■nnn 
nnl 

nn 

yy 


12t 

191 

198 

25t 


198 

198 

0 


Nibble 

Ein Byte umfaßt acht Bit. Ein 
halbes Byte, also vier Bit, 
bezeichnet man als Nibble. 
Der Begriff hat seine Bedeu¬ 
tung, weil vier Bit genau ei¬ 
ner Hex-Ziffer entsprechen: 
dezimal 0110 1100 

hex 6 C 

Der zweite und letzte Teil der 
Bit-Parade folgt in der näch¬ 
sten HC-Ausgabe. 

Kar!-Heinz Koch 
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Scan: S. Höltgen 


Z80-Betriebssystem 
im Eigenbau 

Teil 4: Ausgabe von Zahlen für Schneider CRC und Sinclair Spectrum 


Ein eigenes Betriebssystem 
ohne Zugriff auf das Origl- 
nal-ROM muß auch eine 
Routine aufweisen, die den 
Inhalt von Zahlvariablen auf 
den Bildschirm bringt. 


Sobald Z80-Maschinenpro- 
gramme mit Zahlvariablen 
umgehen, die später Ziffer 
für Ziffer auf den Bildschirm 
ausgegeben werden sollen, 
ist es vorteilhaft, sie im 
BCD-Code abzuspeichern. 
Beim BCD-Code wird in den 
oberen vier Bit und den un¬ 
teren vier Bit eines Byte je¬ 
weils eine Ziffer (0 bis 9) ab¬ 
gelegt. Mit vier Bit kann man 
eigentlich die Zahl 0 bis 15 
darstellen, 10 bis 15 entfal¬ 
len jedoch im BCD-Code. 
Rechnungen im BCD-Code 
sind etwas umständlich, 
denn sie müssen stets im 
Akkumulator ausgeführt 
werden, weil die erneute An¬ 
passung an das BCD-For- 
mat mit dem Befehl DAA nur 
Wirkung auf den Akkummu- 
lator hat. 

Das Programm ZIFF 
bringt eine ganze Zahl mit 
zwei Ziffern in die Zeile D ab 
der Spalte E des Bild¬ 
schirms. HL zeigt beim Auf¬ 
ruf von ZIFF auf die Spei¬ 
cherstelle, an der diese Zahl 
im BCD-Code steht. Soll die 
Zahl vierfach vergrößert er¬ 
scheinen, dann muß Bit 7 
von D gesetzt sein. ZIFF legt 
bei STRG+ 2 das Zeichen # 
ab und schreibt die beiden 
Ziffern einzeln in STRG bzw. 
STRG + 1. Damit ist die ei¬ 
gentliche Zifferndarstellung 
für das Programm TEX 
durchführbar, mit HL als 
Textzeiger auf STRG. 

ZIFF ruft das Programm TEX 
auf, TEX wiederum benötigt 
die Routine ZWIL. Beide 
müssen also im Speicher 
sein. TEX und ZWIL wurden 
in den letzten Folgen dieser 
Serie vorgestellt. In TEX für 
Sinclair Spectrum muß die 
letzte Anweisung, V DEFB 
73, weggelassen werden, 
weil V bereits im Hauptpro¬ 
gramm zum Aufruf von ZIFF 
festgelegt wird. 

In der nächsten Folge sollen 
unter anderem Routinen 
zum Rechnen im BCD-Code 
ausführlich besprochen 
werden. -br 


I 

ZIFFERNDARSTELLUNG 

ZIFF PUSH 

HL 

Der Zeiger auf die Zahl wird gerettet. 

LD 

A,35 

Zur Markierung des Textendes für TEX 

LD 

(STRG + 2),A 

kommt das Zeichen # nach STRG+ 2. 

LD 

A.(HL) 

Von der doppelziffrigen Zahl 

SRL 

A 

wird die höherwertige Ziffer aus 

SRL 

A 

der oberen Hälfte des Bytes in 

SRL 

A 

die untere Hälfte geschoben 

SRL 

A 

(der Rest ist mit Nullen aufgefüllt). 

ADD 

48 

Addition der ASCII-Codezahl von “0". 

LD 

(STRG),A 

Codezahl der höheren Ziffer nach STRG. 

LD 

A,(HL) 

Abgriff der niederwertigen Ziffer 

AND 

15 

in der unteren Hälfte des Bytes 

ADD 

48 

und Addition von 48. 

LD 

(STRG + 1),A 

Codezahl dieser Ziffer nach STRG +1. 

LD 

HL,STRG 

Textzeiger auf STRG, 

CALL 

TEX 

für das Programm TEX. 

POP 

HL 

Falls die Gesamtzahl aus mehr als zwei 

DEC 

HL 

Ziffern besteht, wird schon der 

INC 

E 

Zahlzeiger HL darauf vorbereitet 

INC 

E 

und auch DE korrigiert. 

BIT 

7,D 

Bei vergrößerter 

RET 

Z 

Darstellung springt 

INC 

E 

DE zwei weitere 

INC 

E 

Spalten nach rechts. 

RET 




Routine zur Zifferndarstellung 



ENT 

#5000 ; 

;Der Objektcode wird oberhalb des unteren ROM 
abgelegt 


ORG 

#5000 

und soll später an der gleichen Stelle aufgerufen 
werden. 


CALL 

# B906 

Das untere ROM wird eingeblendet. 


LD 

A,2 

Der Bildschirmmodus 2 


CALL 

SMO 

wird eingeschaltet. 


LD 

D,138 

In vergrößerter Darstellung soll in Zeile 10 


LD 

E,50 

ab Spalte 50 ausgegeben werden. 


LD 

HL.ZAHL+1 

HL zeigt auf das obere Byte von ZAHL. 


CALL 

ZIFF 

Beide Byte von ZAHL 


CALL 

ZIFF 

werden ausgegeben. 


CALL 

RET 

# B909 

Das untere ROM wird wieder ausgeblendet. 

SMO: 

EQU 

#0AE5 

#0ACA beim CPC464, #0AE9 beim CPC6128 

V: 

DEFB 

0,0,0 

Datenbl.ock für den Inhalt von STRG 

ZAHL: 

DEFB 

137,21 

Zahl, die ausgegeben werden soll, im BCD-Code 

STRG: 

EQU 

V 

Zeiger auf den Anfang des Datenblocks 


Hauptprogramm für Schneider CRC zum Aufruf von ZIFF 



ORG 

# 

;Ablage und Aufruf des Objektcodes hinter dem 
BASIC 


LD 

D.138 

;Ausgabe soll in vergrößerter Darstellung in 


LD 

E, 15 

;Zeile 10 ab Spalte 15 erfolgen. 


LD 

HL.ZAHL+1 

;HL zeigt auf das obere Byte von ZAHL. 


CALL 

ZIFF 

;Beide Byte von ZAHL 


CALL 

RET 

ZIFF 

;werden ausgegeben. 

V 

DEFB 

96,0,0,0 

;Datenblockfürden Inhaltvon IX + FARBE und STRG 

ZAHL 

DEFB 

137,21 

;Zahl, die ausgegeben werden soll, im BCD-Code 

STRG 

EQU 

V + 1 

;Zeiger in den Datenblock 


Hauptprogramm für Sinclair Spectrum zum Aufruf von ZIFF 


\ 
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Sinclair Spectrum 


4KTIV 

r>£OMPUTERN 


ZX-ärgert mich 


Ein lustiges Spiel für ein bis vier Personen, wobei der Spec¬ 
trum (16 und 48K) bis zu vier Spieler übernehmen kann. 


Die Spielregeln sind wie 
beim ,,Mensch ärgere Dich 
nicht“-Spiel, das heißt, am 
Anfang sind alle vier Figuren 
eines Spielers im ,,Gehäu¬ 
se“, das nur verlassen wer¬ 
den kann, wenn man eine 
Sechs würfelt. Es ist außer¬ 
dem Pflicht, eine Figur ins 
Spiel zu bringen, falls man 
eine Sechs gewürfelt hat. 
Ausnahmen: 

- auf dem Raussetzfeld 
steht eine eigene Figur 

— man hat alle vier Figuren 

im Spiel , 

Weiterhin ist eß Pflicht, 
das Raussetzfeld freizuma¬ 
chen, ausgenommen man 
müßte seine eigene Figur 
schlagen. Wer eine sechs 
gewürfelt hat, darf nochmals 
würfeln. Dreimal würfeln darf 
man, wenn alle Figuren im 
,.Gehäuse“ stehen. Es be¬ 
steht natürlich Zugzwang, 


auch wenn Sie nicht wollen. 
Ziel des Spieles ist es, alle 
vier Figuren in die ,,Ein¬ 
bahnstraße“ zu lotsen. 
Bedient wird das Spiel über 
die Tasten 1,2, 3, 4, 0 und S. 
Die Tasten 1 bis 4 stehen für 
die einzelnen Figuren, die 
gezogen werden können. 
Wird die 0 gedrückt, so ver¬ 
steht der Computer das so, 
daß Sie nicht mehr ziehen 
können. Dies überprüft er 
natürlich. Sollte er nun eine 
Figur finden, die gezogen 
werden kann, so übernimmt 
der ZX diesen Zug. Sich um 
einen Zug drücken zu wollen 
kann also negative Folgen 
haben. Wenn Sie die Taste 
,,S“ drücken (und danach 
keine andere Taste mehr), 
dann beendet der ZX dieses 
Spiel. Viel Spaß bei dem 
Spiel ,,ZX ärgert mich“. 

Michael Silberberg 


0>PEM 


£ r t rn ich 


rnaerz 1936 by 
Michael Silbe rber 
Berliner Strasse 


g 

10 


5657 Haan 
5 CLERR 4-9999 

10 DRTR 33,0,64-, 17,30,195,1,0, 
27,237,176,201 

20 RESTORE 10: FÜR n=60000 TO 
60011: RERD 3: POKE n,3: NEXT n 
30 POKE 5004-1,0 

100 RRNDOMIZE : OUER 0: LET COl 
=1: BRIGHT 1: PRPER 7: INK 1: CL 
5 


101 BRIGHT O 

20© DIM p (4,4.) : DIM d (4) : DIM W 
(4): DIM q(4): DIM f(80): DIM S( 
4,4) 


300 RESTORE 30©: FOR n=l TO 4: 


RERD 3: FOR r .1 = 1 TO 4: LET p (n , rn ) 
=m : LET f (a +rn ) =n : LET s (n , rn) =a +rn 
: NEXT Oft : NEXT n 
31© DRTR 56,60,64,63 


40© FOR n =1 TO 4: LET W(n)=4: N 
EXT n 

450 LET g f =0: RRNDOMIZE 

46© IF PEEK 50041=64 THEN GO TO 


55© 

500 GO 3UB 1000: GO SUB 1600: L 
ET a p l=©: FOR k =1 TO 4: RESTORE 
500+k: RERD COl,pl: FOR l=© TO 3 
: LET nr=l+l: LET pl=pl+l: GO SU 
B 1200: NEXT l: NEXT K 

501 DRTR 0,56 


502 DRTR 6,6© 

503 DRTR 4,64 

504 DRTR 3,63 

505 RRNDOMIZE USR 60©0©: GO TO 
600 

55© POKE 60001,30: POKE 6©0©2,1 
95: POKE 6©0©4,0: POKE 60005,64 
555 RRNDOMIZE USR SOOO© 

60© FOR q = l TO 4: LET qw=q: GO 
SUB 1500: GO SUB 1700: PRINT RT 

I, 23;"Soll die”;RT 2,23; "Fa r be”; 

INK COl; PRINT RT 3,23; ”0) 

weg-”:RT 4,23;”fallen”;RT 5,23; 

”l) von ”;RT 6,23;"einem”;RT 7,2 
3;"Spieler";RT 3,23;”,oder ” ; RT 
9,23; ”2) v o rn Z X'' 

610 PRINT RT IO, 23; "lieber-"; RT 

II, 23; "no m rn e n ” ; RT 12,23; "werden 
*? ” 

62© LET m$ = INKEY $: IF CODE rn $ < 4 
8 OR CODE m $ >5© THEN GO TO 62© 
63© LET q(q)=»JRL rn $ : NEXT q 
30© GO TO 5000 
100© REM 

1010 RESTORE 1000: LET X =64: LET 

y =Ö 

102© FOR n =1 TO 12: RERD a , b , C : 
FOR rn =1 TO C: LET X=X+16*a: LET 
y =y + 16 * b : C IRCLE X , y , 7 : NEXT rn : 
NEXT n 

1050 DRTR l,©,3,0,1,4,1,0,4,0,1, 
2,—1,0,4,0,1,4,—1,0,2,0,—1,4,— 1, 
0,4,0,-1,2,1,0,4,0,-1,4 
1060 DRTR 96,24,0,1,0,32,88,1,0, 
6,96,152,0,-1,4,160,33,-1,0,3 
107© FOR n =1 TO 4: RERD X,y,a,b, 
C 

108© INK C: FOR rn=l TO 4: CIRCLE 
X , y ,4: LET X=X+16*a: LET y=y + 16 
*b : NEXT rn : NEXT n 

109© INK 1: FOR n=l TO 4: RERD X 
,y,a,b: PLOT X,y: DRRU 2©*a,20*b 
: DR RU -3+6* (a=-l) , -3 + 6*(b = -*l) : 
DRRU 3-6*(a=-l),3-6*(b=-l): DRRU 
3-6*(a=l),3-6*(b=l): NEXT n 
110© DRTR 60,8,0,1,16,124,1,0,13 
2,168,0,-1,172,52,-1,© 

111© RETURN 


IF i g u r eridruc K 


121© OUER 1: LET CO=(nr+48)*3+15 
360: IF apl=0 THEN GO TO 1230 

1215 IF apl>4© THEN INK COl: GO 
TO 122© 

1216 INK 1 

122© RESTORE 1200: FOR n=l TO ap 
l: RERD X,y: NEXT n: GO SUB 125© 
1230 INK COl: RESTORE 120©: FOR 
n =1 TO pl: RERD X,y: NEXT n: GO 
SUB 125© 

124© INK 1: RETURN 

125© LET rg=0: LET C=©: FOR n=Cü 
TO CO+7 

1260 LET b = 123: LET a=PEEK n: FO 
R m =0 TO 7 

1270 IF nr<>0 RND a>=b THEN GO S 
UB 1301 

1271 IF n f =0 RND a > =b THEN PLOT 
x-c,y+rn: LET a=a-b 

1230 LET rg=rg+gr: LET b=b/2: NE 
XT rn 

1290 LET f g =0 : LET C=C+‘l+gr: NEX 
T n 

1300 OUER 0: RETURN 

1301 FOR h =0 TO gr STEP 4: FOR j 
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=0 TO gr/2: PLOT x +m + r g +h , y-c-.j: 

NEXT .)■. NEXT h: LET a=a-b: RETU 
RN 

1310 DRTR 76,12,76,28,76,44- , 76 .. 6 
O , 76,76,60,76,44 , 76,28,76,12,7.6 , 
12,02,12,106,28,108,44, 108,60,10 

8.76.108 

1320 DRTR 76,124- , 76,14-0,76,156,7 

6.172.92.172.108.172.103.156.108 
, 14-0,108,124- , 10S , 108,124,108,140 
,108,156,108,172,108 

1330 DRTR 172,92 ,172,76,156,76,1 
40,76,124,76,103,76,108,60,103,4 

4.108.28.108.12.92.12 

1340 DRTR 92,28,92,44,92,60,92,7 
6,28,92,44,92,60,92,76,92,92,156 
,92,140,92,124,92,103,156,92,140 
,92,124,92,108,92 

1350 DRTR 12,12,28,12,12,23,23,2 

8.12.172.28.172.12.156.23.156.15 

6.172.172.172.156.156.172.156.15 

6.28.172. 28.156. 12.172.12 
1406 REM BIHMy« 

1410 GO SUB 1520: LET WU=INT (RN 
D*6+l> : PLOT 221,6: DRfiW 32,0: D 
RRU 0,32: DRRW -32,0: DRRU 0,-32 
1415 BEEP .01,1: BEEP .01,2: BEE 
P .01,1 

1420 IF WU=1 OP. WU =5 OR WU =3 THE 
N PRINT RT 19,29; 

1430 IF WUOl THEN PRINT RT 18,2 
8; " RT 20,30; " ■" 

1440 IF wu =4 OR WU =5 OR WU =6 THE 
N PRINT RT 20,28; RT 18,30; "■ 

I I 

1450 IF WU=6 THEN PRINT RT 18,29 
RT 20,29; " ■" 

1460 RETURN 
1500 REM 
1510 OUER 0: 

T RT n,23; M 
ETURN 

1520 OUER 0: 

NT RT n,23;' 

RETURN 
1600 REM 

1610 RESTORE 1600: LET X=0: LET 
y=0: LET n f =0: FÜR k=l TO 22: RE 
RD rns : LET m$=CHR$ Fft S : LET CO =15 
360+CGDE m$*8: GO SUB 1250: LET 
y=y+S: NEXT k 

1620 DRTR 32,90,88,32,97,101,114 
,103,101,114,116,32,109,105,99,1 
04,32,127,32,77,83,32 
1630 OUER 1: FOR K=0 TO 21: PRIN 
T RT k,0;" " : NEXT k: OUER 0: RE 

TURN _ 

1700 REM HHMKIH 

1710 RESTORE 1710+qiU 

1711 DRTR 0 

1712 DRTR 6 

1713 DRTR 4 

1714 DRTR 3 

1720 RERD COl 

1730 RETU RN 
1800 REM fcag«gi» 

1810 LET qw=q: GO SUB 1700: REST 
ORE 1800: GO SUB 1500 

1320 DRTR "ist arft M , M Zug M _ 

1830 P RINT RT 1,23; INK COl; "Hi 
: FOR k =1 TO 2: RERD m $ : 
PRINT RT l + k,23; rrt $: ^ NEXT k 
1840 RETURN 
4000 REM 


L o e s c h e n 


FOR n=0 TO 21: PRIN 
": NEXT n: R 

FOR n =17 TO 21: PRI 
": NEXT n: 


Zum Sammeln 


Plrogramm- 

Bibliothek 

Wichtige Hilfsroutinen, 
auf die man immer wieder 
zurückgreifen kann (Teil 15) 

_ : ‘ _ \ / \ _ __ 

28« Grafische Integration 

Die nachfolgende Routine berechnet die Größe ei¬ 
nes Flächenstückes, das zwischen einer Kurve und 
einer waagerechten Achse liegt. Aus der grafischen 
Darstellung wird, bei einer beliebigen unteren Grenze 
beginnend, eine ungerade Zahl von Hochwerten (y- 
Werte) in aufeinanderfolgenden, gleichweiten Schrit¬ 
ten abgelesen. Je kleiner die Schrittweite gewählt 
wird, desto genauer ist die berechnete Fläche. 

Der Aufruf 

Dem Unterprogramm werden ab Zeile 1000 der An¬ 
fangswert U, die Schrittweite S, die ungerade Anzahl 
N und die Größe der abgelesenen Hochwerte Y (I) 
übergeben. Vor der Eingabe der Hochwerte erfolgt 
durch die Anlegung derfürdie Berechnung notwendi¬ 
gen Felder durch eine DIM-Anweisung (Zeile 160). 
Das Programm berechnet in der Variablen F die Größe 
des Flächenstückes in den entsprechenden Grenzen. 

Die Routine 

Die Berechnung der Größe der Fläche erfolgt über 
die sog. M-Formel der Simpson-Regel in Zeile 1070. 
Die dafür notwendigen Summen und Differenzen wer¬ 
den im Unterprogramm berechnet. 




110 PRINT CHR$(147) 

120 CLR 

130 INPUT “UNTERE GRENZE“;U 
140 INPUT “SCHRITTWEITE“;S 
150 INPUT “ANZAHL DER WERTE“;N 
160 DIM D1(N),D2(N),Y(N) 

210 OPEN 1,0 

220 FOR I =0 TO N — 1 

23ÖX-U.+ US : PRINT : 

240 PRINT I-fl“.WERT: “X“ 

250 INPUT# 1 ,Y(I) 

260 NEXT 
270 CLOSE 1 
500GOSUB 1000 
720 PRINT : PRINT 
740 PRINT "FLAECHE:“F 
760 PRINT 

780 PRINT “TASTE !“ : G$ = ““ 

800 GET G$ : IF G$ = ““ THEN 800 
820 PRINT 
840 GOTO 120 

1005 S1=0 : S2 = 0 : F = 0 : N = N-1 
1010 FOR 1 = 1 TO N — 1 STEP 2 
1015 S1 =S1 +Y(I) 

1020 NEXT 
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1025 FOR 1 = 1 TO N 
1030 D1(I) = Y(I) —;Y(I — 1) 

1035 NEXT 

1040 FOR 1 = 1 TO N — 1 
1045 D2(I) = D1(I +1) — D1 (I) 
1050 NEXT 

1055 FOR 1 = 1 TO N-1 STEP 2 
1060 S2 = S2+ D2(l) 

1065 NEXT 

1070 F = 2 * S * (S1 +S2/6) 

1075 RETURN 


Die Routine 

Das Intervall (U, O) wird in n Streifen der Breite S 
zerlegt (Zeile 1005). In Zeile 1020 erfolgt eine Korrektur 
der Streifenbreite S, wenn die Grenzen nicht ganzzah¬ 
lig sind. Die Berechnung der Funktionswerte erfolgt in 
der Schleife ab Zeile 1020 bis Zeile 1030. Aus der 
Streifenbreite S der Zerlegung (siehe auch Zeile 1020) 
und den Summen S1, S2 erfolgt die Berechnung des 
Wertes für das Integral in Zeile 1095 in der Variablen F. 

29. Bestimmtes Integral 

Die nachfolgende Routine berechnet die Größe des 
bestimmten Integrals von beliebigen Funktionen mit 
einer Variablen. 

Der Aufruf 

Vor dem Sprung ins Unterprogramm und vor Über¬ 
gabe der Werte muß eine CLR-Anweisung erfolgen. 
Dem Unterprogramm werden ab Zeile 1000 die obere 
sowie untere Grenze Ö, U und der Funktionsterm F(x), 
(z.B. ist F(x) = SIN (x) übergeben. Der berechnete 
Wert des Integrals wird in Zeile 770 ausgegeben. 


110 PRINT CHR$(147) 

120 CLR 

130 DEF FNF(X) = SIN(X) 

140 INPUT “OBERE GRENZE“;0 
150 INPUT "UNTERE GRENZE“;U 
500GOSUB 1000 
700 REM OUTPUT 
760 PRINT 

770 PRINT "FLAECHE: “F 
780 PRINT 

790 PRINT “TASTE I" : G$ = ““ 

800 GET G$ : IF G$ = ““ THEN 800 
820 PRINT 
840 GOTO 120 

1005 S=0.02 : N = INT((O-U)/S+0.1) 
1010 IF N/2 = INT(N/2) THEN N = N + 1 
1015 DIM Dl(N),D2(N),Y(N),X(N) 

1020 S = (O — U)/(N — 1) : FOR 1 = 0 TO N 
1025 X(l) = U + 1 * S : Y(I) = FNF(X(I)) 
1030 NEXT 

1035 S1 =0 : S2 = 0 - F = 0 : N = N-1 
1040 FOR I = 1 TO N -1 STEP 2 
1045 S1 =S1 +Y(I) : NEXT 
1050 FOR 1 = 1 TO N 
1055 D1(I) = Y(I) —Y(l —1) 

1060 NEXT 

1065 FOR 1 = 1 TO N-1 
1070 D2(I) = D1(I + 1)-D1(I) 

1075 NEXT 

1080 FOR 1 = 1 TO N-1 STEP 2 
1085 S2 = S2 + D2(I) 

1090 NEXT 

1095 F = 2*S*(S1+S2/6) 

1100 RETURN 


4-005 GO SUB 91O0: LET re=wq 
4-010 GO SUB 1500: GO SUB 1800 
4-O20 IF wq=0 THEN RETURN 
4-03© GO SUB 1400: LET wq=wq-l 
4035 IF re =3 FIND WU<>6 THEN RAUS 
E 5: PAUSE 10O: GO TO 4020 
4100 DRTFi "Mi t“ , "wc Icher" , "Figur 
” , " wollen", "Sie ",''ziehen ?" 

4110 RESTORE 41O0: FOR K=1 TO S: 

READ m$: PRINT AT 5+k,23;m$: NE 
XT k 

4115 LET Uiq=0+ (WU =6) : LET re=0 
4120 LET m$ =INKEY$: IF CODE m$<4 
8 OR CODE Hl $ > 52 THEN GO TO 4120 
4125 IF rn$ = "0" THEN GO TO 6026 
4130 BEEP .05,2: LET a =UAL m$: I 
F £<q,a) >56 AND WU<>6 THEN GO TO 
4900 

4140 IF f (q*10-9) =q AND f (q*10-9 
+ UMJ) < > q AND S (q,a) < >q*10 —9 THEN 
GO TO 4900 

4145 RESTORE 6170: FOR k =1 TO q: 
READ C: NEXT k 

4151 IF f(S (q,a) 4l#U) =q AND (£<q, 
a))<=40 AND <£(q,a))+ WU>40 AND C 
=40 THEN GO TO 490O 

4152 IF f (£ (q , a ) +WU ) =q AND £ (q , a 
1 +WU < =40 AND ( ( (£ (q,a) ) <C AND (S 
(q,a.n+WU<C) OR C(S(q,an>C AND 
(£ (q , a)) +WU>C )) THEN GO TO 4900 
4160 LET pl*0: LET b=0: FOR k=l 
TO 4: LET b = b+(f (q*4 + k+52) =q) : N 
EXT k: IF WU =6 AND r' <q*10-9) <>q 

AND S (q , a ) <57 AND bO0 THEN GO T 
O 490© 

4170 IF £ (q,a) >56 THEN LET pl=qi 
10-9 

4175 IF £(q,a)+WU>40 AND £<q,a)< 
=40 AND q < > 1 THEN LET pl=£(q,a) + 
mu -40 

4176 IF PIO0 THEN GO TO 4200 

4185 IF C =40 AND S<q,3)+WU<=44 T 
HEN LET pl=£ (q,3) +W U: GO TO 4200 

4186 IF £(q,a) <=C AND £(q,3)+ UIU> 
C THEN LET UIU 1 =£ (q , a ) - C +WU : LET 
p L =4*q+36+WU1: GO TO 4200 

4190 IF £ (q,a) >=4*q+37 AND £<q,a 
) +wu < =4-*q +40 THEN LET p L =£ (q , a ) + 
WU: GO TO 4200 

4195 IF £<q,a)+WU<=40 THEN LET p 
I. =£ (q , a ) +WU 

4196 IF pl=0 THEN GO TO 4900 

4200 IF f(pl)=q AND pt>40 OR pl> 
q*4 + 40 THEN GO TO 4900 

4201 LET n r =a: LET nrl=nr: LET a 
P L =£ (q , n r ) : IF p L >4-0 AND aP l < =40 

THEN LET d(q)=d(q)+1 

4202 IF ap l >56 THEN LET w(q)=w(q 
) -1 

4203 GO SUB 8O00: LET qw=q: LET 
nr=nrl: GO SUB 17O0: GO SUB 12O0 

LET £<q,nrl)=pl: LET f (apl):0: 
LET ftpllsq: GO TO 4020 
4900 PRINT AT 13,23 " I II. e g a L ” .; AT 
•14,23; "move !": PAUSE 30: BEEP 
.1,7: BEEP .1,5: BEEP .1,7: PAUS 
E 111: PRINT AT 13,23;" 

AT 14,23;" _ ": GO TO 4110 

5000 rem ianaa« 

5010 PAPER 7: INK 1: GO SUB 1500 
5500 FOR q = 1 TO 4 

5505 IF d <q) =4 THEN GO TO 5530 

5510 IF q(q > =1 THEN GO SUB 4000 

5520 IF q (q) =2 THEN GO SUB 6000 
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5525 IF PEEK 23560*CGDE "£" ÜR P 

EEK 23560«CODE "5" THEN GO TO 95 
OO 

5530 WEXT q 

5600 LET Z X =0: FOR q = l TO 4: LET 
ZX=ZX+ (d (q) =4 OR q <q) =©!» : WEXT 
q: IF Z X > = 3 THEW GO TO 9500 

5999 GO TO 5000 

6000 REM 0H 

6010 GO SUB 1700: GO SUB 1800: G 
O SUB 9000 

6020 IF wq =0 THEW RETURN 

6021 IF Wq=3 THEW FOR K=1 TO 4: 
LET p(q,U*k: WEXT K 

6025 GO SUB 1400: LET wq=wq-l 

6026 IF WU =6 THEW LET wq = l 

6027 IF f (q* 10-9.1 =q ftWD f (q*10-9 
+ WU) < > q THEW GO TO 8900 

6028 IF WU4d (q) < =4 RWD d(q)>© TH 
EW GO TO 7000 

6030 IF WU < >6 THEW GO TO 6100 
6050 IF W (q :i =0 THEW GO TO 6100 
6060 IF f (q*10-9!i =q THEW GO TO 6 
100 

6070 LET w (q> =W (q) -1 : GO SUB 880 
0: LET ap l =q*4+52 + bn : LET pi.=q*l 
0-9: GO SUB 8000 

6080 LET qw=q: LET f (apl)=0: LET 
f(pl)ssq: FOR k=l TO 4: IF S(q,k 
:» =ap L THEW LET ZX = k 

6090 WEXT K : LET S (q,ZX) =p l : LET 
n f =ZX : GO SUB 1700 : GO SUB 1200 
: GO TO 602© 

6100 LET aq=wq: GO SUB 9000: IF 
Wq = 3 THEW LET wq=aq: PAUSE 5: PR 
USE IO©: GO TO 6020 

6110 LET wq=0+(WUs6): GO TO 7100 
6120 FOR k =1 TO 4: LET al=S (q,k) 
+WU: IF al-wu>40 THEW GO TO 6150 
6125 IF 81>40 THEW LET al=al-40 
6130 IF f (al) <)0 RWD f(al)oq TH 
EW GO TO 6160 
6150 WEXT k: GO TO 6200 
6160 RESTORE 6160: FOR 1=1 TO q: 

RERD bl: WEXT l 
6170 DRTR 40,10,20,30 
6180 IF a 1 > b 1 RWD bl > =S (q , k .1 THE 
N GO TO 6150 

6185 IF bl=40 RWD a1-WU <1 THEW G 
O TO 6150 

6190 LET nr=k: LET ap L=£ (q,K) : L 
ET plsal: GO SUB ©000: LET nf=k: 

LET qw=q: GO SUB 1700: GO SUB 1 
200: LET S(q,k)spl; LET f(apl)=0 
: LET f (p U =q: GO TO 6020 
62O0 FOR Z =1 TO 4: LET p=p(q,z>: 

IF £(q,p)>40 THEW GO TO 6300 
6210 LET bl=WU +£ (q,p) : RESTORE 6 
170: FOR k =1 TO q: RERD Cl: WEXT 
k 

6220 IF b1> 40 THEW LET bl = bl-40 
6230 IF C1=40 RWD bl-WU<l THEW G 
O TO 6300 

6240 IF b1> C1 RWD Cl>=£ (q,p) THE 
W GO TO 6300 

6245 IF f(bl)=q THEW GO TO 6300 
6250 LET n r =p : LET apl=£(q,nr) : 
LET pl=bl: GO SUB 8000: LET qw=q 
: GO SUB 1700: GO SUB 1200: LET 
S(q,nr)apl: LET Map 0=0: LET M 
pl)=q: GO TO 6020 
6300 WEXT Z 

6950 IF q(q)=l THEW BEEP .2,-9: 
GO TO 4020 


6955 RESTORE 6950: FOR k=l TO 3: 

RERD m $ : PR IWT RT 5 + k , 23 ; Hi $ : NE 
XT k: BEEP .1,5: PRUSE 5: PRUSE 
100 

6960 DRTR "Ich kann" ,"nicht"/'zi 
ehen ! " 


6999 GO TO 6020 

7000 FOR k=l TO 4: IF f(36+4*q+k 
)=q RWD 3644*q+k+Wü<=40+4^q THEW 

LET apl=36+4#q+k: LET pl=36+4*q 
■fk+WU: GO TO 7020 
7010 WEXT k: GO TO 6029 
7020 IF f(pl)=q THEW GO TO 6029 
703O FOR k =1 TO 4: IF £(q,k)=apl 
THEW LET n f = k 
7040 WEXT k 

7050 LET qw=q: GO SUB 1700: GO S 
UB 1200: LET £ (q , n fi =p L : LET Ma 
p l) =0: LET f (pl)sq; GO TO 6020 
7100 LET n f =0: RESTORE 617©: FOR 
k =1 TO q: RERD a: WEXT k 
7110 LET b=a -WU : FOR k=l TO 4: I 
F £ ( q ,k) > = b RWD S(q,k) <=a THEW L 
ET nr=k 

7120 WEXT k: IF nf=0 THEN GO TO 
6120 

7123 LET b=S (q,nr) +WU : IF b>a TH 
EW LET b= ( b-a) +36+q*4 

7124 IF b>4*q+40 THEW GO TO 6120 

7125 IF b<=40 THEW GO TO 6120 
7130 IF f < b :* = q THEW GO TO 6120 
7140 LET d(q)=d(q)+l: LET apl=£( 
q,nr): LET pl=b: LET nrl=n-f: GO 
SUB 8000: LET qw=q: LET nf=nf1: 
GO SUB 1700: GO SUB 1200: LET £ ( 
q,nr)=pl: LET f (apl)=0: LET f (pl 
j =q: GO TO 6020 

8000 rem r=am 

8010 IF f (p U =0 THEN RETURN 
8020 LET M£ = f (p U : LET W (TOS) =W (TA 
£ ) +1: LET f (p U =0: FOR 1=1 TO 4: 

IF S(BIS,l)=pl THEW LET ZX = l 
8030 WEXT l: LET XZ=52+ £*4+ ZX: 
LET f (XZ) slft£: LET £ (TA £ , Z X ) =X Z : L 
ET apll=apl: LET pll=pl: LET apl 
=pl: LET nr=ZX: LET pl=XZ: LET q 
W=fAS: GO SUB 1700: GO SUB 1200 
8035 GO SUB 8100 

8040 LET aplsapll: LET pl=pll: R 
ETURN 


3100 for 0=1 TO 4: IF p(ms,o)=nr 

THEW LET ZX=0 

8110 WEXT O: FOR 0=ZX TO 3: LET 


WEXT O: 
RETURW 


LET p 


IF r*(q*4+52+l 
RETURW 


P (ms ,o) =p ( ta s ,o+ 1 :• : 

(TA £ , 4) =n r : WEXT O : 

8800 REM EI3B 
8810 FOR 1=1 TO 4: 

:« =q THEW LET bn = L : 

8820 WEXT l: LET bn=4: RETURW 
8900 FOR k =1 TO 4: IF £(q,k)=q*l 
0-9 THEW LET nfl=k 
891© WEXT k 

8920 LET apl=q*10-9: LET pl=q*10 
—9+WU: GO SUB 8000: LET nf=nf1: 
LET qw =q: GO SUB 1700: GO SUB 12 
00: LET £ (q,nrl) =pl: LET f (apl) = 
0: LET f ( p U =q : GO TO 6020 

9000 rem raanaii 

9020 LET a=q^4+40: IF W(q)=4 THE 
N GO TO 9090 


9030 IF W(q)=3 RWD f(a)=q THEW G 
O TO 9090 


9040 IF W (q) =2 RWD Ma)=q RWD f( 
a-1)=q THEN GO TO 909© 
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AKTIV 

rl|JOWPUTERN 


9050 IF W (q 
8-i:«=q RND 
090 

9060 LET wq 
9090 LET wq 
9095 RETURN 
9100 REM 
9110 LET wq 
f (q*4+52+k ) 
9115 NEXT K 
9120 IF wq= 
RN 

9130 IF wq= 
N RETURN 
914-0 IF wq = 
f <q*4+39) = 
RN 

9150 IF wq= 
f (q*4. +39) = 
N LET w q = 3: 
9160 LET wq 
9500 PRU5E 
1: CLS : GO 


:« = 1 RND f (a)sq RND f ( 
f (a-2 S =q THEN GO TO 9 

=1: GO TO 9095 
= 3 


Prue f 


=0: FOR K =1 TO 4-: IF 
=q THEN LET wq=wq+l 

4- THEN LET wq=3: RETU 

3 RND f <q*4+4©) =q THE 

2 RND f (q *4 4-4-0) =q RND 
q THEN LET wq=3: RETU 

1 RND f (q *4+40.1 =q RND 
q RND f (q*44-38) =q THE 
RETURN 
=1: RETURN 

222: PRPER 7: BRIGHT 
SUB 9800: RESTORE 95 


50: PRINT RT 18,0;"DruecKen Sie 
' Y ■' um nochmal zu spielen !" 
9550 RERD ms,ZX: IF ms=18 THEN R 
ESTORE 9550: PRUSE 5: GO TO 9550 

9555 BEEP . 4/fftS,ZX 

9556 DRTR 4,8,4,8,4,6,4,8 ,2,-1,4 
> 1,4,4,8,4,8 ,6 ,2,6,4 , -59, 4,3,4,8 
, 3,6,3,8,4,6,2,4,4 ,-59 

9557 DRTR 4,6,4,6 ,3,4,3,6,4,4,2 , 
3,4,—59,4,8,4,8,3,6,3,8,4,6,3,4, 
lt> ,8,8,8,16,6,4,3,2, —1,2,1,4,4,3 
,4,8,6 

9553 DRTR 2,6,4,-59,4,8,4,8,8,6, 
3,3,4,6,4,4,4,4,3,6,8,6,8,6,8,6, 
4,6,4,9,2,3,2,6,1,4,13,18 
9600 LET m$=INKEY$: IF m$<> M y M R 
ND m $ < >"Y" THEN GO TO 9550 
97O0 GO TO 100 

9300 RESTORE 9800: LET gf=4: LET 
nr=l: FOR K =1 TO 13: INK INT (R 
ND*4) : RERD m*,X',y: LET CO=15360 
+CODE m$*8: GO SUB 1250: NEXT K 
9310 DRTR ,, Z M ,48,170, “X^ , 176,17© 
,"a",4,130,"e",40,130,"f",76,130 
, "9 " , 112,130 , M e " , 148,130 , M r " , 184 
, 130 , •* t " , 220,130 , ”rn M , 16,90 , " i " , 8 
0,90, M C V ,144,90,“h" ,208,90 
9820 PRINT BO;" ® 1986 by MiChae 
l Silbe rberg" 

9830 RETURN 


UDG+ 


Dieses Programm erweitert und ergänzt die Blockgrafik des 
Spectrum und macht es möglich, ansehnliche Grafikfiguren 
zu entwerfen, ohne spezielle UDG-Zeichen zu konstruieren. 
Insgesamt stehen 72 Standard-Grafikzeichen zur Verfügung 
(Spectrum 48K). 


In Zeile 9Ö10 wird der nor¬ 
male Zeichensatz aus dem 
ROM in die Nähe des RAM- 
Tops verschoben. Die Zeile 
9920 legt zunächst die Start- 
Adresse des neuen Zei¬ 
chensatzes fest (POKE 
23607,249), wonach in der 
folgenden FOR-NEXT- 
Schleife die neuen Zeichen 
eingelesen und in die neuen 
Adressen gepoket werden. 
Zur Übersicht werden inner¬ 
halb der Zeilen 9992bis 9996 
durch eine Schleife die be¬ 
treffenden Zeichen mittels 
CHR§ normal und invers 
dargestellt. 
Bedienungshinweise 
Die Bedienung von 
,,UDG-h“ ist denkbar ein¬ 
fach: 

1. ,,UDG + “ durch LOAD““ 
laden oder durch 
MERGE““ dazuladen. 
(Vor MERGE““ ist es rat¬ 
sam, sich zu vergewis¬ 
sern, ob die Zeilen 9900 
bis 9997 frei sind). 

2. Durch GOSUB 9900 wer¬ 
den alle Kleinbuchstaben 


nach kurzer Wartezeit zu 
Grafikzeichen umgewan¬ 
delt. (Bitte beachten Sie, 
daß dann alle Kleinbuch¬ 
staben nicht mehr ver¬ 
fügbar sind. Das gilt 
auch für Fehlermeldun¬ 
gen.) 

Mit GOTO 9990 werden 
die betreffenden Zeichen 
in einer Tabelle in der 
Reihenfolge Buchstabe, 
Grafikzeichen normal 
und Grafikzeichen invers 
übersichtlich gemacht. 
(Ein Ausdrucken dieser 
Tabelle mit COPY er¬ 
leichtert das Arbeiten er¬ 
heblich.) 

Sie können „UDG + “ 
auch dazu benutzen, die 
DATA-Zeilen mit eigenen 
Entwürfen zu füllen. 
Sollten Sie ,,UDG-h“ in 
Verbindung mit einem 
anderen Programm be¬ 
nutzen, müssen Groß¬ 
buchstaben für die Varia¬ 
blen genommen werden, 
damit das Listing lesbar 
bleibt. Peter Bergen 


9900 REM Häiaa 

9910 CLERR 63999: LET X=48384: F 
OR Y = 15616 TO 16383: POKE (Y+X) , 
PEEK Y: NEXT Y 

9920 POKE 23607,249: RESTORE 902 
0: FOR Y = 1 TO 26: RERD R$: LET Z 
=63744+8*C0DE R$: FOR T=0 TO 7: 
RERD S: POKE Z+T/S: NEXT T: NEXT 
Y: RETURN 
9930 DRTR 


4,240 
9934 DRTR 
0 , 0,0 


" a " 

, 0,0 

, 0 .. O , 

1 ,3 

,7,15 

b 

, 0,0 

.. 0 .. 0 , 

128 

, 192 

,22 

.. c .. 

, 24.0 

,224-, 

192 

, 128 

, 0 , 

“d" 

,15, 

7,3,1 

, 0 , 

0 , 0 , 

0 

" e " 

, 0,0 

, 0 , 0 , 

24, 

60,1 

26 , 


, 128 

7 192 , 

224 

, 240 

, 24 

128 






M g M 

, 255 

, 126 , 

60 , 

24,0 

, 0 , 

"h " 

,1,3 

,7,15 

, 15 

,7,3 

, 1 

" i " 

, 1,1 

, , ■-* t 

7, 1 

5,63 

,25 


255 


0,0 


9948 DRTR "j",128,123,192,192,22 
4,240,252,252 

9950 DRTR "K",255,252,240,224,19 
2,192,128,12© 

9952 DRTR "l",255,63,15,7,3,3,1, 
1 

9954 DRTR M m",1,3,7,15,31,63,127 
,255 

9956 DRTR "n",128,192,224,240,24 
*_* f c, *— 1 j 5 4- , ■ 1 Fl 5 

9958 DRTR "O",255,231,195,129.12 
9,195,231,255 

9960 DRTR "p",255,126,60,24,24,6 
0,126,255 

9962 DRTR ”q.",153,204,102,51,153 
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, 204 , 102,51 

9964. DRTR *' f " , 255,129,255,24- , 255 
, 129,255,24- 

9966 DRTR M s",153,102,102,153,15 
3,102,102,153 

9963 DRTR "t" ,65,170,35,170,85,1 
70,85,170 
9970 DF 
O 

9972 DF 
9,195 


126.60.24 
9976 DRTR 

126.24.24 
9978 DRTR 
6,60,24,0 
9980 DRTR 

5.90.24 
9990 REM | 


E = 1: LET HO =0: FÜR Y=65 TO 90: P 
RINT RT UE,HO;OHR $ (Y) ; " = M ;CHR 

$ (Y+32); M "; INUERSE ljOHR* (Y 

+32): LET UE=UE+2 

9994 IF UE > 20 THEN LET UE = 1: LET 
HO =HO + 11 

9996 NEXT Y: STOP 


"IJ " 

,85, 

0,85 

,0 

,35 

,0 ,85 , 

"V " 

, 195 

, 129 

,0 

,0, 

0,0,12 

“ w M 

ro 

60,1 

26 

,25 

5,255, 

M X M 

, 24 , 

60,1 

26 

,25 

5,255, 

"y M 

, 102 

,255 

,2 

t=r er 

255 , 12 

• i z • 1 

,24, 

60,2 

4- , 

90 , 

255,25 

UDG + DEMO 

1 




R 7: 

INK 

0 : 

CL 

S : 

LET U 


Variable 

Bedeutung 

HO 

Horizontale für Tabelle 

S 

Variable zur Aufnahme der DATAS 

T 

FOR-NEXT-Variable zum Einlesen der DATAS 

VE 

Vertikale für Tabelle 

X 

Basis der Zeichensatzverschiebung 

Y 

Universelle FOR-NEXT-Variable 

Z 

Adressen der neuen Zeichen 

A§ 

String zur Aufnahme der Kleinbuchstaben 


Variablenliste 


n 

= 

A 

W 

K 

= 

r 

A 

u 

= 

iiii 

m 


B 


- 

* 

L. 

- 


k 

u 

= 


• 


c 

= 

r 


‘ M 

= 

A 

r 

u 

= 

♦ 

:: 


D 

= 


fe 

N 

- 

k 


X 

= 

♦ 

r ■<« 

y 

E 

= 


m 

O 

=5 

□ 

♦ 

V 

= 


U 


F 

= 

► 

x 

P 

= 

X 

H 

z 

* 

* 

K X 


G 

= 

- 


Q 

= 


SS 






H 

= 

« 

k: 

R 

= 


« 






I 

= 

A 

w 

S 

= 


38 






U 

= 

L 


T 

= 

m 

m 







Tabelle der Grafikzeichen 


_____ 

Spickzettel 

Die aktuelle Kurzanleitung 


„DB Master One“ 
Dateiverwaltung für Atari ST 


Kapazität: 

Maximale Dateigröße: 320 KByte 
Maximale Datensatzlänge: 3000 Zeichen 
Maximale Feldlänge: 3000Zeichen (Feldname höchstens 
64 Zeichen) 


MAKEONE 


Um in den Programmteil ..Dateimasken erstellen“ zu gelan¬ 
gen, auf dem Desktop MAKEONE.PRG anklicken. 

FILE 


New: Anklicken, um eine neue Dateimaske zu erstellen. 
Redesign: Abändern einer bestehenden Maske ohne Daten- 
| Verlust. 

Save: Abspeichern der aktuellen Maske. 

J Quit: Zurück zum Desktop. 

I Anklicken eines Punktes auf dem Arbeitsblatt positioniert 
das erste Datenfeld. Nach Eingabe des Feldnamens und 
RETURN erscheint die Kapazitätsangabe des Datenfeldes. 
Anklicken an der linken Punktmarkierung gestattet horizon¬ 
tale und vertikale Veränderung der Feldgrenzen (und der 
Kapazität). Nach dem Erstellen der Namen- und Datenfelder 
I mit OPTIONS Schrifttyp und -große festlegen. Absaven. 

I EDIT 



Cut Field: Speichert ein ganzes Feld ab bis zur späteren 
Verwendung. (Das Feld verschwindet vom Arbeitsblatt.) 
Copy Field: Speichert ein Feld ab. Kann mit ,,Paste“ wieder 
aufgerufen werden. 


Paste Field: Ersetzt ein aktuelles markiertes Feld durch das¬ 
jenige, das zuletzt mit ,,Copy“ oder ,,Cut“ abgespeichert 
wurde. 

Cut Text: Speichert einen markierten Textteil zur späteren 
Verwendung ab. 

Copy Text: Speichert einen markierten Textteil zur späteren 
Verwendung ab. Der Textteil bleibt auf dem Monitor. 

Paste Text: Holt den zuletzt mit ,,Cut“ oder,, Paste“ abgeleg¬ 
ten Textteil an die Cursorposition zurück. Kurzbefehle ent¬ 
sprechend wie in USEONE 



Obout One 

25 records, U full 

VT52 Emilator 
KontroIlfeld 

RS 232 Einstellung 
Drucker Anpassung 

- 

Switch Files ... 

Save A S 

Quit A 0 

^3 H8LP 


glSStra 

sseil |M n| 

3H 

^3 


Cut 

TI 

Copy 

Ac ! 

Paste 

A v 

Clear Field 


H8LP 




Vorwahl!! 


DB Master One — die SubmenUs USEONE: Die Kurzbefehle 
gelten teilweise auch für MAKEONE 
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Commodore 64/128 


^KTIV 

«COMPUTERN 

Speed-Dos neu 


Nützliche Änderungen an einem Speed-Dos-System werden 
hier beschrieben. Es handelt sich um Anpassungen der Far¬ 
ben und Veränderungen der Betriebsweise des Monitors. Die 
neue Version kann entweder nach jedem Einschalten im 
RAM installiert werden oder, was bequemer ist, in ein 


EPROM gebrannt werden. 

Bei den meisten Varianten 
von Speed-dos wird die 
Farbe des Bildschirms in 
den Speicherzellen ECD9 
und EDCA durch 00 auf 
Schwarz eingestellt. Auf 
schwarzem Bildschirm sind 
Zeichen sehr kontrastreich, 
wenn sie gelb geschrieben 
werden. Dies wird durch fol¬ 
gende Eingriffe erreicht: 
E4A9 = 9E bewirkt gelbe 
Zeichendarstellung nach 
Startmeldung. 


E534 = Ida #07 erzeugt 
gelbe Zeichenfarbe beim 
Bildschirmreset. 

FF22 = 9E stellt das ,,Direc¬ 
tory“ (Fl-Taste) in gelben 
Zeichen dar. 

Auto-Repeat 

Der Auto-Repeat für alle Ta¬ 
sten läßt sich leicht durch 
eine kurze Routine errei¬ 
chen. Platz für sie ist ab 
EA61. 

Die Reset-Routine ab FCE2 
wird durch FCFB = JSR 


EA65 verlassen. 

EA61 = JMP EA7B über¬ 
springt die ab EA65 einge¬ 
fügte Routine. 

Ab EA65 wird dann 

JSR FF5B 

LDA #80 

STA 028A 

RTS 

eingefügt, die Auto-Repeat- 
Routine ist damit implemen¬ 
tiert. Geänderte Tastenbele¬ 
gung für Suchen und Än¬ 
dern im Monitor: Fl erhöht 
momentane Adresse um 8, 
F3 verringert entsprechend, 
F5 erhöht um CO (entspricht 
einer Monitorseite), F7 ver¬ 
ringert um diesen Wert. 
Diese Änderungen werden 
in der Tabelle FB97 bzw. 
FBEO vorgenommen: 
fb97 07 06 04 02 03 05 
fbeO 01 cO 08 


Tabelle mit neuen 
Werten 

Für die beabsichtigten Än¬ 
derungen sind sehr massive 
Eingriffe notwendig. 

Die neue Anzeigenroutine 
des Monitors ist in den ab¬ 
gedruckten Programmen 
mit einem jeweils angefüg¬ 
ten Kommentar beschrie¬ 
ben. 


Funktionstasten¬ 

belegung 

Es können die Belegungen 
für die Tasten F4, F6 und F8 
geändert werden. Mit F4 
wird jetzt (List), mit F6 sY 
49152 (sys 49152) und mit F8 
sA (save) erzeugt. Diese Än¬ 
derungen werden durch 
Eingriff in die Tabelle ab 
FF10 bewirkt. 


ff Id 

00 

S3 

90 

3e 

24 

9e 

Od 

00 

... >$... 

;chr$(147),sw,dir., 











ge,er 

ff25 

S3 

52 

d5 

Od 

00 

4c 

cf 

22 

. rU .. 10" 

;chr$(147),run,load‘ 

ff2d 

00 

4c 

cf 

20 

Od 

00 

00 

4c 

.10...1 

; load#*#,cr,list 

ff35 

c9 

Od 

Od 

00 

53 

d9 

20 

34 

I...SY4 

;cr,cr,sys 49152, 

ff3d 

39 

31 

35 

32 

Od 

00 

53 

cl 

9152..sA 

; er,save" 

ff45 

22 

00 










Geänderte Funktionstastenbelegung 



SPLAT: Zugriff auf vorgefertigte Masken. 

Mailing List: Adressenverzeichnis (Amerikanische Norm). 
Checkbook: Schecknachweis. 

Collection: Einfache Lager-/Rechnungsverwaltung. 

Date: Jahr, Monat, Tagesdatum. 

Wart Hogs: Hundezüchterkartei (Stubenrein, bissig?). 
OPTIONS 


Label Style: Schriftart und -große des Feldnamens. 

Data Style: Schriftart und -große im Datenfeld. 

Fünf Schriftgrößen wählbar. Außerdem fett, hell, kursiv, un¬ 
terstreichen und Kontur. 

USEONE 


Mit QUIT zum Desktop und USEONE.PRG anklicken. Auf 
Verzeichnis der Masken Auswahl treffen, dann OK. 


Kurzbefehle 


Save 

CONTROLS 

Quit 

CONTROL Q 

Cut 

CONTROL X 

Copy 

CONTROLC 

Paste 

CONTROL V 

Print 

CONTROL P 

Add 

CONTROLA 

Find Some 

CONTROL F 

Next 

CONTROL N 

Previous 

CONTROL B 

Delete 

CONTROL D 

FILE 


Copy: Markierter Text wird abgespeichert. Wird mit ,,Paste“ 
wieder abgerufen. 

Paste: Ruft den letzten mit Copy oder Cut abgelegten Text an 
die Cursorposition zurück. 

Clear: Löscht alle Daten eines Feldes. 

REPORT 


Design New: Aufruf zu Sortieren und Ausgabe der Daten. Am 
unteren Bildrand erscheint ein Submenü mit den Optionen 

Form, Fields, Find, Sort. 

Form: Column - Die Daten eines Blattes in einer Zeile. 
Page - Die Daten eines Blattes als Briefkopf. 

Record: Kompletter Ausdruck eines Datenblattes. 

Fields: Bei den Optionen Column und Page Wahl der Felder, 
die ausgegeben werden sollen. 

Find: Sucht exakt gleiche Begriffe in bestimmten Feldern 
(EQUALS), Teile von Zeichenketten (CONTAINS) oder Da¬ 
tenmengen innerhalb definierter Grenzen (BETWEEN), also 
,,von - bis“. Drei Suchkombinationen möglich. 

Sort: Sortiert auf maximal drei Feldern gleichzeitig nach 
Alphabet oder Nummern, aufsteigend oder absteigend. Ad¬ 
diert Zwischensummen (Print Subtotais). Befehl für Seiten¬ 
wechsel (Start New Page). 

Edit: Mit der Löschfunktion (DELETE) können mit Design 
New erstellte Dateien aus dem ,,Report-Verzeichnis“ ge¬ 
löscht werden. 

Print: Aufforderung, die auszudruckende Kartei zu benen¬ 
nen oder eine bereits vorhandene umzubenennen. 
Aufforderung, die gewünschte Datei aus dem Report-Ver¬ 
zeichnis zu wählen und auf dem Monitor (Screen) zu zeigen, 
auszudrucken (Printer) oder auf Diskette abzulegen.. 
RECORD 


Auslastung (in Prozent) und Zahl der Datenblätter. 

Switch Files: Wechsel zu einer anderen Datei in USEONE. 
Save: Abspeichern des aktuellen Files auf Diskette. 

Quit: Zurück zum Desktop. 

EDIT 


Cut: Entfernt markierten Text vom Bildschirm in den Spei¬ 
cher. Er wird mit Paste zurückgerufen. 


Add: Neues Datenblatt derselben Kartei. 

Find all: Führt zum Anfang einer Kartei. 

Find Some: Sucht gleiche Begriffe in bestimmten Feldern. 
(EQUALS), Teile von Zeichenketten (CONTAINS) oder Da¬ 
tenmengen innerhalb definierter Grenzen (BETWEEN). 
Next: Blättert zum nächsten Datenblatt. 

Previous: Blättert zum vorhergehenden Datenblatt. 

Delete: Löscht das aktuelle Datenblatt. 
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Monitordarstellung 

Der alte Monitor hat eine ge¬ 
packte Darstellung der Hex- 
Zahlen mit wechselnder re- 
verser Darstellung, was 
wohl die Übersicht verbes¬ 
sern sollte. Die Zeichendar¬ 
stellung der Hexzahlen im 
unteren Bildbereich macht 
die Zuordnung zwischen 
Zeichen und Hexzahl 
schwierig. Die Darstellung 
kann deshalb folgenderma¬ 
ßen geändert werden: 

Nur acht Hexzahlen statt 16 


pro Zeile 

24 Zeilen mit acht Zeichen 
Ein Blankzeichen zwischen 
den Zahlen 

Abwechselnde reverse Dar¬ 
stellung entfällt 
Zeichendarstellung der acht 
Hexzahlen neben den Zah¬ 
len mit folgender Vereinba¬ 
rung: Zeichen mit CHR$- 
Code <20 werden als 
dargestellt, Zeichen mit 
CHR$-Code >127 als rever- 
ses 

Als letzte Änderung muß in 


FA58 und FA5A die reverse 
Darstellung durch NOP auf¬ 
gehoben werden. 

Implementierung des 
neuen Systems 

Die Änderungen werden von 
einem Monitor aus von E400 
bis FD00 auf Diskette zu¬ 
rückgeschrieben. Wer nicht 
in der Lage ist, .sich ein 
neues EPROM mit den Än¬ 
derungen zu brennen, kann 
das neue System software¬ 
mäßig nutzen. Dazu wird zu¬ 


erst UP5 geladen und ge¬ 
startet. Danach wird mit 
POKE 1,53 auf das ins RAM 
verschobene System umge¬ 
schaltet. Schließlich wird 
dann die Änderung gela¬ 
den, und das neue System 
steht zur Verfügung. Beim 
erneuten Einschalten muß 
die Prozedur wiederholt 
werden. Deshalb ist ein 
neues EPROM auf Dauer 
vorteilhafter. 


fa6c 

a9 29 

Ida #29 

;Zeiger auf 0429 stellen 

fa6e 

85 fc 

sta fc 

fa70 

ad 88 02 

Ida 0288 

;HByte von Bildspeicher 

fa73 

85 fd 

sta fd 

;nach fd 

fa75 

a2 18 

Idx #18 

. ;24 Zeilen schreiben 

fa77 

a9 00 

Ida #00 

;Spaltenzähler 

fa79 

85 c3 

sta c3 

Jöschen 

fa7b 

20 3d fa 

jsr fa3d 

;Adresse anzeigen 

fa7e 

30 60 fa 

jsr fa60 

;2 Leerzeichen 

fa81 

a4 c3 

Idy c3 

;offset laden 

fa83 

bl fe 

Ida (fe), Y 

;Inhalt laden 

fa85 

20 44 fa 

jsr fa44 

;und anzeigen 

fa88 

e6 c3 

inc c3 

;nächste Stelle 

fa8a 

20 5d fa 

jsr fa5d 

;1 Leerzeichen 

fa8d 

aO 07 

Idy #07 

;fertig? 

fa8f 

c4 c3 

cpy c3 

fa91 

10 EE 

bpi fa81 

;Schleife 

fa93 

20 5d fa 

jsr fa5d 

;1 Leerzeichen 

fa96 

20 a2 fa 

jsr faa2 

;Bildschirmcode 

fa99 

ca 

dex 

-.nächste Zeile 

fa9a 

dOdb 

bne fa77 

;Schleife für 24 Zeilen 

fa9c 

20 ca fc 

jsr fcca 

;Adressenzeiger wieder 

fa9f 

c6 ff 

decff 

;herstellen 

faal 

60 

rts 

;Ende 


Geänderte Anzeigeroutine des Monitors 


faa2 

bl fe 

Ida (fe),y 

;lnhalt laden 

faa4 

20 5f f6 

jsr f65f 

;Routine wandelt CHR$- 

faa7 

88 

dey 

Code in 

;Bildschirmcode. Code <20 

werden 

;als 

;> 127 als RVS dargestellt. 
;nächstes Zeichen 

faa8 

10 f8 

bpi faa2 

;darstellen 

faaa 

20 6e ea 

jsr ea6e 

;nächste Zeile vorbereiten 

faad 

c8 

iny 

;y löschen, weil nachfolgen¬ 

faae 

60 

rts 

des 

;Programm dies verlangt 


fcca 

fccc 

fccf 

a9 40 Ida #40 

20 22 fa jsr fa22 

60 rts 

;Komplement auf 100 
;alter Zeiger hergestellt 
;durch dec ff außerhalb 

UP3 stellt Bildzeiger auf Bildanfang 


ea6e 

a9 08 

Ida #08 

;offset laden 

ea70 

20 22 fa 

jsr fa22 

;Adreßzeiger erhöhen 

ea73 

a9 09 

Ida #09 

;Zeilenoffset 

ea75 

20 62 fa 

jsr fa62 

;Bildschirmzeiger auf 

ea78 

60 

rts 

;Zeilenanfang stellen 


UP4 erhöht Adreßzeiger um 8, der Bildschirmzeiger wird 
auf Zeilenanfang gestellt 


033c 

a9 00 

Ida #00 


033e 

85 fe 

sta fe 


0340 

a2 01 

Idx #01 

;Zeiger auf Tabelle 

0342 

bd 5d 03 

Ida 035 d,x 

0345 

85 ff 

sta ff 

;Zeiger laden 

0347 

aO 00 

Idy #00 

0349 

bl fe 

Ida (fe),y 

;ROM laden 

034b 

91 fe 

sta (fe),y 

;nach RAM 

034d 

88 

dey 


034e 

d0f9 

bne 0349 

;Schleife 

0350 

e6 ff 

inc ff 


0352 

a5 ff 

Ida ff 

; fertig? 

0354 

dd 5f 03 

cmp 035f,x 


0357 

dO ee 

bne 0342 

;nein 

0359 

ca 

dex 

;nächstes ROM 

035a 

10 e6 

bpi 0342 


035c 

60 

rts 

;ende 

035d 

aO eO cO 




UP5 verschiebt Betriebssystem ins RAM 


UPI wandelt Hexzahlen in Bildschirmcode um 


f65f 

c9 20 

cmp #20 

f661 

90 11 

bcc f674 

f663 

c9 40 

cmp #40 

f665 

90 Oa 

bcc f671 

f667 

c9 60 

cmp #60 

f669 

90 Od 

bcc f678 

f66b 

c9 80 

cmp #80 

f66d 

10 Od 

bpi f67c 

f66f 

49 20 

eor #20 

f671 

91 fc 

sta (fc),y 

f673 

60 

rts 

f674 

a9 2e 

Ida #2e 

f676 

10 f9 

bpi f6771 

f678 

49 40 

eor #40 

f67a 

10 f5 

bpi f671 

f67c 

a9 ae 

Ida #ae 

f67e 

30 fl 

bmi f671 


kleiner 20? 
ja 

kleiner 40 -Ziffern-? 
ja 

kleiner 60 -Buchstaben-? 
ja 

größer 127 -kein Bildcode-? 
ja 

Code korrigieren/Grafikzeichen 
darstellen 
ende des up 
Code für 
darstellen 

Code korrigieren-Buchstaben- 
und darstellen 
Code für RVS laden 
und darstellen 


UP2 wandelt CHR$-Code in Bildschirmcode um 


SCHOLL und 
CLEAR 


Ein beliebiger Teil des Bildschirms kann vom Scrolling aus¬ 
geschlossen werden. Ferner eine Routine zum teilweisen 
Löschen des Bildschirms (C64). 


Jeder Programmierer eines 
Blockgraphikadventures 
wird schon einmal vor dem 
Problem gestanden haben, 
daß durch viele Eingaben 
des Spielers die Grafik per 
Scrolling vom Bildschirm 
verschwindet. Professio¬ 
nelle Abenteuerspiele ha¬ 
ben ein Textfenster. Das 


Scrolling ist auf den unteren 
Bereich des Bildschirmes 
beschränkt. Wie ich auf ei¬ 
ner Wanderung durch das 
ROM-Listing festgestellt 
habe, kann man diesen Ef¬ 
fekt durch das Ändern von 
nur einer Speicherstelle er¬ 
reichen. Es ist dies die 
Adresse 59639. Da sie je- 
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doch im Kernelrom liegt, 
muß man zunächst die Be¬ 
reiche von $A000 bis $BFFF 
und $E000 bis $FFF ins 
RAM kopieren. Danach 
kann man das ROM mit 
POKE 1,53 abschalten. 
Genau dies geschieht in Li- 
sting 1. Da das Kopieren in 
BASIC etwa 70 Sekunden 
dauert, wird es in einer klei¬ 
nen Maschinenroutine erle¬ 
digt, die in Zeile 70 in den 
Kassetten puffer geschrie¬ 
ben wird. Die Datasettenbe- 
sitzer können beruhigt sein, 
sie wird nur einmal benötigt. 
Die Routine wird mit SYS 
828 gestartet (Zeile 80). 
Nach etwa einer halben Se¬ 
kunde ist*sie fertig. Danach 
kann das ROM mit POKE 
1,53 ausgeblendet und die 
Scrollroutine verändert wer¬ 
den. Nehmen Sie also bitte 
die Nummer der ersten 
Zeile, ab der gescrollt wer¬ 
den darf (die Zeilen von 0 bis 
24 gezählt), subtrahieren 
Sie davon 1 und poken Sie 
diesen Wert in die Adresse 
59639 ein. Im Listing 1 wird 
ab der 21. Zeile gescrollt, 
also 21 minus 1 gleich. 20 
einpoken. Den Normalzu¬ 
stand stellen sie mit POKE 
1,55 wieder her (das ROM 
wird wieder eingeschaltet). 
Nun könnte der Wunsch auf- 
treten, Text- und Grafikfen¬ 
ster getrennt zu löschen. 
Hierzu dienen die beiden 
Maschinenroutinen, die in 
Listing 2 eingepoket wer¬ 
den. Durch SYS 828 löschen 
Sie den scrollenden, durch 


SYS 842 den feststehenden 
Bereich des Bildschirms. 
Für Kassettenbenutzer und 
alle, die den Kassettenpuf¬ 
fer, den diese Routinen be¬ 
legen, brauchen, sei hier er¬ 
wähnt, daß diese Pro¬ 
gramme auch in anderen 
Bereichen lauffähig sind. 
Sie können sie also zum 
Beispiel auch in den Sprite- 
block 11 einiesen. Dann 
müssen Sie nur die Zeile 70 
in Listing 2 wie folgt ändern: 
FOR I = 704 TO 704 + 26: ... 
Die Routinen werden dann 
mit SYS 704 und SYS 
704 + 14 aufgerufen. Eine 
andere Möglichkeit wäre, 
die Routinen in den freien 
Bereich ab $C000 zu legen. 
Dann müssen Sie statt 704 
den Wert 49152 einsetzen. 
Gleiches gilt übrigens nicht 
für Listing 1. Diese Routine 
ist nur im Kassettenpuffer ab 
828 lauffähig. 

Kleine Erläuterung für Ma¬ 
schinensprachekundige: 

In der Scrollroutine ab 
$E8EA wird das X-Register 
mit 255 geladen. Danach 
wird es jeweils mit INX um 
eins erhöht und danach das 
Unterprogramm ,, Scrollen 
einer Zeile“ aufgerufen. Dies 
geschieht solange, bis es 
den Wert 24 angenommen 
hat. Ändert man nun den La¬ 
debefehl am Anfang um und 
weist dem X-Register einen 
höheren Wert zu, über¬ 
springt die Routine beim 
Scrollen die ersten Zeilen. 
Dies ist der ganze Trick. 

Knut Dietrich 


5 SZ=20:REM ==> SCROLLEN AB 4.LETZTER 
ZEILE 

10 REM ************************ 

20 REM ** SCROLLMODIFIKATION ** 

30 REM ** (C)1986 BY ** 

40 REM ** KNUT DIETRICH ** 

50 REM ************************ 

60 REM ==> EINLESEN DER MASCHINENROUTINE 
ZUM KOPIEREN VOM ROM INS RAM 
70 FORI=828T0862:READX:POKEI,X sS=S+X:NEX 
TI:IFS< >5231THENPRINT"FEHLER! ! !":END 
80 SYS828:REM ==> ROM INS RAM KOPIEREN 
90 POKE1,53 s REM ==> KERNEL- UND BASICROM 

AUSSCHALTEN 

100 P0KE59639,SZ:REM ==> 1. SCROLLZEILE 

MINUS 1 POKEN 

110 DATA169,000,133,251,169,160,032,074, 
003,169,224,076,074,003,133,252,160,000 
120 DATA162,032,177,251,145,251,200,208, 
249,202,240,004,230,252,208,242,096 


10 SYS9*4096;ASSEMBLERAUFRUF 
20 .OPT P,OO;AUSGABE AUF BILDSCHIRM 
30 *= 828;STARTADRESSE 
40 ; 

50 ;KOPIEREN VON KERNEL- UND BASIC-ROM 
60 ;INS DARUNTERLIEGENDE RAM 
70 ; 

80 START LDA #*00;ZEIGER AUF *A000 
90 STA *FB;(BASIC-ROM) 

100 LDA #*A0 

110 JSR SCHLEIFE;8 KBYTE INS RAM KOPIERE 
N 

120 LDA #*E0;ZEIGER AUF *E000 (KERNEL) 
130 JMP SCHLEIFE;8 KBYTE KOPIEREN 
140 SCHLEIFE STA *FC;HI-BYTE SPEICHERN 
150 LDY #0;32*256=8192 BYTES=8 KBYTE 
160 LDX #32;INS RAM KOPIEREN 
170 LABEL1 LDA (*FB),Y 
180 STA (*FB),Y 
190 INY 

200 BNE LABEL1;256 BYTES KOPIEREN 
210 DEX 

220 BEQ LABEL2;32 MAL . 

230 INC *FC;HI—BYTE UM EINS ERHOEHEN 
240 BNE LABEL1;UNBEDINGTER SPRUNG 
250 LABEL2 RTS;ZURUECK INS BASIC 


Assemb/er-Listing zu Listing 1 


10 REM ******************** 

20 REM ** CLR - ROUTINEN ** 

30 REM ** (C) 1986 BY ** 

40 REM ** KNUT DIETRICH ** 

50 REM ******************** 

60 REM ==> MASCHINENPRG EINLESEN 

70 FORI=828T0854:READX:POKEI,X:S=S+X:NEX 

Tis IFS04277THENPR INT "FEHLER! ! ! " 

80 : 

90 REM UNTEREN BEREICH LOESCHEN: SYS828 
100 REM OBEREN BEREICH LOESCHEN: SYS842 
110 s 

120 DATA174,247,232,232,224,025,176,005, 

032,255,233,048,246,096,174 

130 DATA247,232,232,202,048,005,032,255, 

233,048,248,096 

653 BLOCKS FREE. 

Listing 2 


10 SYS9*4096;AUFRUF DES ASSEMBLERS 
20 .OPT P,00;AUFGABE AUF BILDSCHIRM^ 

30 *= 828;STARTADRESSE 
40 ; 

50 ;SCROLLBEREICH LOESCHEN 
60 ; 

70 CLEARSB LDX 59639;1. SCROLLZEILE LADE 
N 

80 CLSB1 INX;ZAEHLER ERHOEHEN 
90 CPX #25;SCHON LETZTE ZEILE 
100 BCS CLSB2;JA 

110 JSR *E9FF;NEIN-ZEILE LOESCHEN 
120 BMI CLSB1;UNBEDINGTER SPRUNG-WEITER 
130 CLSB2 RTS;ZURUECK INS BASIC 
140 ; 

150 ;FESTSTEHENDEN BEREICH LOESCHEN 
160 ; 

180 CLEARFB LDX 59639;1.SCROLLZEILE LADE 
N 

190 INX;ZAEHLER RICHTIGSTELLEN 

200 CLFB1 DEX;ZAEHLER ERNIEDRIGEN 

210 BMI CLFB2;SCHON ALLE ZEILEN 

220 JSR $E9FF;NEIN.ZEILE LOESCHEN 

230 BMI CLFB1;UNBEDINGTER SPRUNG—WEITER 

240 CLFB2 RTS;ZURUECK INS BASIC 


Listing 1 


Assemb/er-Listing zu Listing 2 
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Joystick-IRQ 

Eine interruptgesteuerte Joystickabfrage für den C64, mit 
der ein Sprite gesteuert werden kann. Zwei Spriteblöcke 
wechseln sich ab, so daß eine Animation entsteht. 


Die meisten BASIC-Pro- 
gramme werden durch die 
Joystickabfrage und Sprite- 
animation sehr langsam. 
Aus diesem Grund habe ich 
diese Interruptroutine in 
Maschinensprache ge¬ 
schrieben. Die Routine läuft 


parallel zu einem Pro¬ 
gramm, das dadurch nicht 
langsamer wird. Bei der Ani¬ 
mation wechseln sich je¬ 
weils, für jede Richtung, 
Spriteblöcke ab. Es müssen 
also insgesamt acht Sprite¬ 
blöcke vorher definiert sein. 


Folgende Blöcke sind vor¬ 
gesehen: 

Sprite nach oben: 190, 191 
Sprite nach unten: 192, 193 
Sprite nach links: 194, 195 
Sprite nach rechts: 196, 197 
Die Joystickabfrage ist für 
Port 2 vorgesehen. Vor dem 
Start der Routine mit SYS 
49152 muß der erste Sprite 
eingeschaltet sein. Der 
Sprite läßt sich über den ge¬ 
samten Bildschirm bewe¬ 
gen. Der Feuerknopf des 
Joysticks wird von dem Pro¬ 
gramm nicht beachtet. 
Nachdem man den Lader 


eingegeben hat, kann man 
das Programm als reinen 
MC-Code auf Diskette ab¬ 
speichern und im eigenen 
Programm durch die Zeile 
1 |F A = 0 THEN A = 1: 
LOAD“JOY-IRQ“,8,8 
am Anfang des Programms 
einladen. Eine zweite Mög¬ 
lichkeit wäre, die Daten in 
das Programm einzubauen. 
Vorteile bringt die Routine 
besonders beim Spielen. 
Sie kann aber auch gut in 
Menüs oder Zeichenpro¬ 
grammen verwendet wer¬ 
den. Sven Hasselmeyer 


1 FÜRI=0TO185 s READA s POKEI+49152,A:M=M+As 
NEXT 

2 IFM023387THENPR INT "FEHLER IN DEN DATE 
N. " 

4 PRINT"WOLLEN SIE DAS PROGRAMM ALS MC-C 
ODE- ROUTINE SPEICHERN ?" 

6 GETA$:IFA$="N"THENEND 
8 IFA$< >"J"THEN6 

10 SYS(57812)"JOY—IRQ",8:POKE193,0:POKE1 
94,192:POKE174,186:POKE175,192:SYS62957 

32 DATA120,169,13,141,20,3,169,192,141,2 
1 

33 DATA3,88,96,173,0,220,170,41,1,208,27 

34 DATA206,1,208,164,159,192,10,208,18,1 
72 

35 DATA248,7,192,190,208,6,238,248,7,76 

36 DATA48,192,169,190,141,248,7,138,41,2 

37 DATA208,27,238,1,208,164,159,192,10,2 
08 

38 DATA1B,172,248,7,192,192,208,6,238,24 
8 

39 DATA7,76,80,192,169,192,141,248,7,138 

40 DATA41,4,208,37,206,0,208,208,8,173,1 
6 

41 DAT A208,73,1,141,16,208,164,159,192 

42 DATA10,208,18,172,248,7,192,194,208,6 

43 DATA238,248,7,76,122,192,169,194,141 

44 DATA248,7,138,41,8,208,37,238,0,208,2 
08 

45 DATA8,173,16,208,73,1,141,16,208,164 

46 DATA159,192,10,208,18,172,248,7,192,1 
96 

47 DATA208,6,238,248,7,76,164,192,169 

48 DATA196,141,248,7,164,159,192,10,208, 
4 

49 DATA169,0,133,159,230,159,76,49,234 

50 DATA1,141,16,208,76,49,234 

BAS/C-Listing zu Joystick-IRQ 


5 REM DEMO 

7 IFA=0THENA=1:LOAD"J OY-1RQ",8,8 

10 FORI=0TÜ511:READA:POKEI +190*64,A:NEXT 

:REM DATEN FUER SPR.LESEN 

12 P0KE53269,1:P0KE53248,150:P0KE53249,1 

50 

14 POKE2040,190:REM DATEN AUS BLK.190 
16 SYS49152:REM IRQ-ROUTINE AKTIVIEREN 
18 END 

99 REM SPRITE-DATEN 

100 DATA0,0,0,1,192,0,3,231,0,7,231,128, 
15,231,192,15 

102 DATA231,224,30,231,224,28,103,240,30 

,231,240,31,231,240,31,231 

104 DATA240,31,231,240,31,207,240,31,223 

,240,15,255,224,15,255,224 

106 DATA7,255,192,3,255,128,1,255,0,0,0, 

0,0,0,0,0:REM DATEN FUER BLK.190 

108 DATA0,0,0,1,192,0,3,247,0,7,247,128, 


15,247,192,15 

110 DATA247,224,30,247,224,28,119,240,30 

,247,240,31,247,240,31,247 

112 DATA240,31,247,240,31,255,240,31,255 

,240,15,255,224,15,255,224 

114 DATA7,255,192,3,255,128,1,255,0,0,0, 

0,0,0,0,0:REM DATEN FUER BLK.191 

116 DATA0,0,0,0,0,0,0,255,128,1,255,192, 

3,255,224,7 

118 DATA255,240,7,255,240,15,251,248,15, 
243,248,15,231,248,15,231 

120 DATA248,15,231,248,15,231,120,15,230 
,56,7,231,120,7,231,240 

122 DATA3,231,240,1,231,224,0,231,192,0, 
3,128,0,0,0,0:REM DATEN FUER BLK.192 
124 DATA0,0,0,0,0,0,0,255,128,1,255,192, 
3,255,224,7 

126 DATA255,240,7,255,240,15,255,248,15, 
255,248,15,239,248,15,239 

128 DATA248,15,239,248,15,239,120,15,238 
,56,7,239,120,7,239,240 

130 DATA3,239,240,1,239,224,0,239,192,0, 
3,128,0,0,0,0:REM DATEN FUER BLK.193 
132 DATA0,0,0,0,0,0,0,0,0,0,0,0,0,255,0, 

3 

134 DATA255,192,15,191,240,31,31,248,63, 

191,252,63,255,252,31,252 

136 DATA252,0,1,252,0,3,252,31,255,252,1 

5.255.248.7.255.240 

138 DATA1,255,192,0,127,0,0,0,0,0,0,0,0, 
0,0,0:REM DATEN FUER BLK.194 
140 DATA0,0,0,0,0,0,0,0,0,0,0,0,0,255,0, 

3 

142 DATA255,192,15,191,240,31,31,248,63, 

191,252,63,255,252,63,255 

144 DATA252,63,255,252,0,3,252,31,255,25 

2.15.255.248.7.255.240 

146 DATA1,255,192,0,127,0,0,0,0,0,0,0,0, 
0,0,0:REM DATEN FUER BLK.195 
148 DATA0,0,0,0,0,0,0,0,0,0,0,0,0,255,0, 

3 

150 DATA255,192,15,253,240,31,248,248,63 
,253,252,63,255,252,63,63 

152 DATA248,63,128,0,63,192,0,63,255,248 
,31,255,248,15,255,240 

154 DATA3,255,192,0,255,0,0,0,0,0,0,0,0, 
0,0,0:REM DATEN FUER BLK.196 
156 DATA0,0,0,0,0,0,0,0,0,0,0,0,0,255,0, 

3 

158 DATA255,192,15,253,240,31,248,248,63 
,253,252,63,255,252,63,255 
160 DATA252,63,255,252,63,192,0,63,255,2 
48,31,255,240,15,255,224 

162 DATA3,255,128,0,254,0,0,0,0,0,0,0,0, 
0,0,0:REM DATEN FUER BLK.197 


Demo-Listing zu Joystick-IRQ 
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DATA- 

Generator 

Hat man ein Assembler-Programm geschrieben und möchte 
es nun in ein BASiC-Programm einbinden, ist es sehr müh¬ 
sam, den Maschinencode irgendwie in DATA-Zeilen zu brin¬ 
gen. Der „DATA-Generator“ schafft hier Abhilfe und legt be¬ 
stimmte Speicherbereiche automatisch in DATA-Zeilen ab 
(C128). 

Nach dem Start mit „RUN 
60000“ sind folgende Infor¬ 
mationen anzugeben: 

1. ANFANGSADRESSE 
(0-65535) 

2. ENDADRESSE 
(0-65535) 

3. SPEICHERBANK (0-15) 

4. ERSTE ZEILENNUMMER 
(0-60000 beziehungsweise 
>60200) 

5. SCHRITTWEITE (beliebig) 

6. ANZAHL (1—37 bezie¬ 
hungsweise 1 -49) 


7. (H)EX ODER (D)bZ CH" 
oder “D“) 

(Die „ANZAHL“ gibt die 
Menge der Zahlen in einer 
Programmzeile an.) 

Sind alle Parameter korrekt 
angegeben, werden die 
DATA-Zeilen in DEZIMAL 
beziehungsweise HEXADE¬ 
ZIMAL generiert. 

Danach kann die Routine 
mit „DELETE 60000-60200“ 
gelöscht werden. 

Uwe Komoß 


60000 SCNCLR 

60010 INPUT "ANFANGSADRESSE ";A 
60020 INPUT "ENDADRESSE ";E 
60030 INPUT "SPEICHERBANK ";B 
60040 PRINT 

60050 INPUT "ERSTE ZEILENNUMMER »;Z 
60060 INPUT "SCHRITTWEITE ";W 
60070 INPUT "ANZAHL " ;S 
60080 PRINT 

60090 INPUT "(H)EX ODER <D)EZ ";M* 


60100 IF S>49 AND M*="H" OR S>37 AND M*= 
"D" OR A>E OR Z=60000 OR M*<>"H" AND M*< 
>"D" OR W=0 THEN PRINT CHR*(19);:GOTO 60 
010 

60110 BANK B 

60120 F0RI=1T04:WI(I) =PEEK (227+1):NEXT 
60130 CHAR,0,12,CHR*(27)+"T":TRAP60200 
60140 SCNCLR 

60150 IF M*="H" THEN BEGIN:PRINT Z"DATA 
" ; :FOR 1=1 TO S:PRINT RIGHT*(HEX*(PEEK(A 
+1-1)),2):IF A+I=E+1 THEN 60200:ELSE 
:NEXT:PRINT CHR*(157)" " 

60160 BEND:ELSE PRINT Z"DATA ";:FOR 1=1 
TO S:PRINT USING"###";PEEK(A+I-l);:PRINT 
",";:IF A+I=E+1 THEN 60200:ELSE NEXT:PRI 
NT CHR*(157)" " 

60170 PRINT "A="A+S":Z="Z+W":GOTO 60140" 
60180 POKE 208,0:POKE 842,19:POKE 843,13 
:POKE 844,13:POKE 208,3 
60190 END 

60200 PRINT CHR*(157)" PRINT "FORI=lTO 
4:P0KE227+I,WI(I):NEXT:CHAR,0,12,CHR*(27 
)+CHR*(64)":GOTO 60180 



Reversi/Directory- 
Druck/Verbesserte TRACE- 
Funktion/Formatieren un¬ 
ter BASIC 

Schneider-K69 

Kassette 21,80 Mark 

Schneider-D69 

Diskette 33,80 Mark 

Printer-Spooler 

Atari ST-D69 

Diskette 22,80 Mark 

Easy-DATA/REM-Killer/ 

Page-Lister/Directory-Loa- 

der/Sicher laden 

Atari XL-K69 

Kassette 20,80 Mark 

Atari XL-D69 

Diskette 25,80 Mark 

ZX-ärgert mich (16 + 

48K)/UDG -F (48K) 

Spectrum-K69 

Kassette 16,80 Mark 

DATA-Generator 

C128-K69 

Kassette 12,80 Mark 
C128-D69 

Diskette 17,80 Mark 

SCROLL & CLEAR/Joy- 
stick-IRQ 

C64-K69 

Kassette 16,80 Mark 


C64-D-69 

Diskette 21,80 Mark 


Top-Games 

Commodore 64 (Januar bis 
August 1985) 

Schatzsuche/Roulette/Go- 
blin 64/Reversi/Lifegame/ 
River Raid 64/Schießbude/ 
Chaser/Alien/Willi 
Kassette C64-K596 39,-Mark 
Diskette C64-D596 39, —Mark 
Schneider CPC (Juli bis No¬ 
vember 1985) 

Vier gewinnt/Kamikaze/Köt- 
tel/Kniffel/The Wall/Pago¬ 
den von Peking/Car-Ware/ 

S n a ke 

Kassette CPC-K596 39, -Mark 
Diskette CPC-D596 (3") 

49,— Mark 

Atari (Juli bis November 
1985) 

Golden Cellar/Sabotage/ 

The Castle/Treasure Hunt/ 
Lost in the Antartica/Mr. 
Pac/Höhlenflieger/Segel- 
flug 

Kassette Atari-K596 39, -Mark 
Diskette Atari-D596 39, -Mark 


MSX 

Pacman/Super Memory/ 
Monkey 

Kassette MSX-K59625,-Mark 
Diskette MSX-D596 (3,5") 

35,- Mark 
Spectrum (April bis Dezem¬ 
ber 1985) 

3D-Golf/Frutti/Olympiade/ 
Superbingo/Intellecto/ 
Sechsundsechzig/Der 
Spion/Brücke/Labyrinth 
Kassette Spectrum-K596 

39,- Mark 

Small Business und 
Utilitys 

Commodore 64 (Januar bis 
Dezember 1985) 
Master-Tape/Kalender/ 

Sechs Stimmen/Disksort/ 
Sprite de Luxe/Filemana¬ 
ger/Diskettendoktor 
Kassette C64-K597 

39,- Mark 
Diskette C64-D597 

39,- Mark 
Game-BAS IC/Macro- 
Assembler-Editor 
Kassette C64-K595 39,-Mark 
Diskette C64-D595 39, -Mark 


Schneider (August bis 
Dezember 1985) 
Druckerroutinen/Termin ka- 
lender/Ast'ronomie/Datei- 
verwaltung/CPC-Hardcopy/ 
Zeichen malen 

Kassette CPC-K597 39,-Mark 
Diskette CPC-D597 (3") 

49,- Mark 
Atari (August bis Dezember 
1985) 

Monitor/Sounddemo/Gra- 
fikdemo/Kalender 
Kassette Atari-K597 29, -Mark 
Diskette Atari-D597 29, —Mark 
MSX (Oktober bis Dezem¬ 
ber 1985) 

Logo-Interpreter/Dia 1 
gramm/Haushaltskasse 
Kassette MSX-K597 

25,- Mark 

Diskette MSX-D597 (3,5") 

35,- Mark 

Spectrum (Mai bis Novem¬ 
ber 1985) 

Laufschrift/Super- DATA- 
Generator/Variablen-Lister/ 
Weltenbummler/Spectrum 
Data/Super-Sprite 
Kassette Spectrum-K597 

39,- Mark 
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Bradbury, A.J. 

Das Abenteuer-Programmier- 
buch für den Commodore 64 

Erst programmieren — dann 
spielen 

196 Seiten, 18 Abb.,30,- DM 
ISBN 3-8023-0809-3 

Senftleben, Dietrich 
Start mit Commodore-Logo 

Das kleine Logo-Einmaleins 
Grafik • Text • Musik 
212 Seiten, 69 Abb.,30,- DM 
ISBN 3-8023-0802-6 

Wittwehr, Clemens 

Spiel und Aktion mit 
Commodore-Logo 

Mit der Schildkröte ins Land 
der Abenteuer 

160 Seiten, 42 Abb.,28,- DM 
ISBN 3-8023-0851-4 

Sinclair, lan 

Mach mehr aus Deinem 
Commodore 64 

Einführung in die Maschinen¬ 
sprache 

180 Seiten, 69 Abb., 30,- DM 
ISBN 3-8023-0808-5 

Baumann, Rüdeger 
Grafik mit dem 
Home-Computer 

Grundlagen und Anwendungen | 
programmiert in BASIC 
328 S., zahlr. Abb., 38,- DM 
ISBN 3-8023-0769-0 

Rügheimer, Hannes 
Spanik, Christian 

Mein zweites 
Commodore-64-Buch 

Das Buch das nach dem Hand¬ 
buch kommt 

280 Seiten, 23 Abb., 38,- DM 
ISBN 3-8023-0808-5 

Sacht, Hans-Joachim 
Home-Computer 
kurz und bündig 

Was jeder über Home-Compu¬ 
ter wissen muß 
152 Seiten, 72 Abb., 20,- DM 
ISBN 3-8023-0790-9 



VOGEL 


Computerbücher 





Multiplan auf dem 
Commodore 64 


Was Drucker und Plotter: 
alles können 

Praktische Anwendungen 
mit Home- und Personalcomputern 


Bernd Kretschmer 




VOGEL-BUCHVERLAG 

WÜRZBURG 


VOGEL-Computerbücher 
helfen lernen, verstehen, 
anwenden 

Sie erhalten bei Ihrem 
Buch- und Computerfach¬ 
händler kostenlos das neue 
Verzeichnis „VOGEL- 
Computerbücher ’85/86“ 
mit rund 100 aktuellen 
Titeln unserer Reihen 
CHIP WISSEN und HC - 
Mein Home-Computer. 


Kretschmer, Bernd 

Multiplan auf dem Commodore 64 

Eine systematische Einführung 
176 Seiten, 61 Abbildungen 
Diese systematische Einführung in das 
Tabellenkalkulationsprogramm Multiplan 
in Deutsch hilft Ihren Commodore 64 für 
völlig neue Aufgaben einzusetzen. Die¬ 
ses einführende Buch zeigt an einfachen 
Beispielen (Prozentrechnung, Umsatz¬ 
statistik, Textverarbeitung, Lieferschein), 
wie man mit Zahlen, Texte und Dateien 
verarbeiten und mischen kann. 


ISBN 3-8023-0799-2 


28,- DM 


Görgens, Alfred 

Was Drucker und Plotter alles 
können 

Praktische Anwendungen 
136 Seiten, 47 Abbildungen 
Mit dieser Übersicht erhalten Sie die 
wichtigsten Informationen der gängig¬ 
sten Druckertypen, ihre Besonderheiten 
und Leistungsmerkmale. Praktische An¬ 
wendungen mit Matrix-, Nadel-, Typen¬ 
raddruckern, Laserdruckern sowie 
Trommel- und Flachbettplottern werden 
vorrangig behandelt. 

ISBN 3-8023-0783-6 28,— DM 
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Bitte verwenden Sie den vorbereiteten Auttragscoupon 

für Ihre Anzeige in der HC-Börse. Sie finden ihn auf den nächsten Seiten. 


□ = gewerblich 


Biete an 
Hardware 


Atari 130 XE, Disk 1050, Touch-Tab- 
let, 12 Games, 5 Bücher, usw. VB 750 
DM. Tel. (0 69) 43 33 03. 

Apple Ile, 80 Zeichen + 64K, 1 Lw., 
Literatur u. Disketten, VB 1700 DM. 
Tel. (02 02) 64 51 58, ab 16.30 h. 

C 64-Farbmonitor, 1701-1641 

MPS801, zu verkaufen. Tel. (0 22 24) 
8 07 37. 


Plantron PC, 256-KB-RAM, 2 Disk., 
Lw. ä 360 KB, nur 1850 DM! 
f Schwenkb. Monitor, 498 DM; B.Sy- 
/ stem MS-DOS 2.11, 198 DM; Soft- 
, wäre f. PC: Fibu — Lohn — Faktura, 
\ nur 798 DM. Versand p. Nachnahme 
+ Porto. Firma Ernst Pieber, Am 
Bellershof 1,4150 Krefeld 1. 0 

CPC464, CP664, CPC6128 User! 
Lichtgriffel mit Programmen und 
dt. Anleitung nur 49 DM. Versand 
gegen Scheck/Nachnahme, Info 
gratis! Fa. Schißlbauer, Postfach 
11 71S, 8458 Sulzbach, Tel. (0 96 61) 
65 92 bis 21 Uhr. 0 

Sharp MZ 821, Neuw. Software, 
Joystick 370 DM, Tel. (0 98 76) 3 51. 

Dragon 32, Software (u.a. System- 
erw.) + Kass.rec., Drucker GP 100, 
Lit. 300 DM. Tel. (0 70 22) 3 47 55. 

ZX81, 16K, Aufs.tast. u. z. Einb., 
Lichtgr., Steckk. dazu (PI. f. PIO), 
Drucker, Literatur, Software, Zu- 
beh., VB 500 DM, Tel. (06 81) 6 73 00. 

Apple llc, neues Demogerät, Ga¬ 
rantie, 1250 DM. Tel. (0 98 76) 3 51. 


• ZX-Spectrum 

• Reparatur-Schnelldienst 

• und Ersatzteile 

• Computer & Medientechnik 

• Heinz Meyer 

• Rahserstr. 52, 4060 Viersen 1 

• Tel. (0 21 62) 2 29 64. 0 


M - 

Sinclair QL dt. Vers., 128KB mit 720 
KB Disk inkl. Software, Lit., 1200 
DM, Tel. (04841)64591. 

Österreich: CPC-464, Farbmonitor, 
Floppy -F 6 3"-Discs, CP/M 2.2, 2 
Joysticks, CPC-464, Intern, Preis 
8000 öS, Tel. (00 43 77 29) 4 68. 

IBM Graphics Printer/Epson FX 80, 
VHB 700 DM. Tel. (04 31) 64 21 40. 

Casio PB-700, OR-4, FA-10, CM-1, 
Sw. Mahrholz, Goethestr. 86, 2850 
Bremerhaven. 

C 64 m. Hypra, Load, Floppy 1541, 
Monitor 1701, Lektüre, VB 1100 verk. 
Tel. (09 31) 70 94 56 

CI 6 CI6 Besitzer Achtung CI 6 CI 6 
64KByte Speichererweiterung nur 
149 DM, bei Einbau durch uns. 89 
DM bei Selbsteinbau. Info gratis! Fa. 
Klaus Schißlbauer, Postfach 11 71E, 
8458 Sulzbach, Tel. (0 96 61) 65 92 
bis 21 Uhr. 0 

NCR DM V, 8/16 Bit, (CPM/MS- 
DOS) 256KB-Hauptspeicher, 2 
Disk.-Laufwerke, 1 freistehende er¬ 
weiterbare Festplatte 10 MB, 1 
Druckerinterface, 1 Textverarbei¬ 
tung (TEX-ASS), Tel. (0 56 92) 23 09. 
★★★★★★★★★★★★★★★★ 

★ Drucker MPP 1361 f. CBM ★ 

★ 8032-8296 150 Z./sek. ä 550 ★ 

★ DM. Tel. (0 61 57) 8 31 68. ★ 

★★★★★★★★★★★★★★★★ 

Apple 2 +, 64K, Z80, 80Z, 2 LW Mo¬ 
nitor, IBM-Tast. CP/M, dBase, 
Wordstar, Cobol usw. 1500 DM. Tel. 
(0 24 06) 7 98 83. Mo-Fr 15-18.30 
Uhr. 


Apple II Europlus, 64K, 2 LW, 80 Z., 
RS 232C, EPSON-Karte, Monitor 
(bernstein), PASCAL u.a. SW, H6., 
VB 1800 DM; Apple Graphic-Ta- 
blet (orig.) mit Contr., SW, H6. VB 
700 DM; F. Meyer, Tel. (0 89) 68 38 58. 

ATARI 260 ST, Komplettsystem 
-F Softw. -F Literatur, 1850 DM. 
J. Brunk, Tel. (0 82 33) 9 22 39. 

EPSON PX-8, kaum gebraucht, 
1450 DM. Tel. (02 34) 53 13 36. 


Supermac Mac Plus mit 2 MB, 

8500 DM. Externe Festplatte Magnet 
20, 5200 DM (alles so gut wie neu). 
Tel. (0 40) 54 53 42. 

Tandy, Modell III, Neuzustand, 2 
LW, mit RS 232 (evtl. eig. Software). 
VB 1200 DM. Tel. (0 69) 50 14 09 (ab 
19.00 Uhr). 

Atari 1040 STF, Uhr, Roms, Zweit- 
floppy, viel Software, Drucker NEC 
P7 fast neu, Tel. (0 27 72) 4 24 80 
abends. 


Apple 2e mit 2 Laufwerken, Moni¬ 
tor, Z80- und 80Z-Karte. 1600 DM. 
Tel. (02 31)45 53 08. 


{Achtung! — Ich biete an: Disket¬ 
ten BASF 2D/96TP1. 

1 St. = 5 DM; 5 St. = 20 DM. 
Reichhaltiger HW- und Software- 
Programmkatalog gegen Unkosten¬ 
beitrag von 5 DM. Zahlung in bar 
oder Barscheck, bei NN 5 DM Ge¬ 
bühr. Bei M. Schulz, Kleiststraße 5, 
1000 Berlin 30. □ 

Commodore: 8032, aufgerüstet, 
Floppy 8250 LP -F TR-Drucker HR 15. 
VB: 5500 DM. Tel. (0 21 04) 78 12. 


Apple II + original! 80 Z Mont. 
Handbu. VB 1550 DM. Tel. (0 69) 
15 33 81 91, Zi 150! 

Wegen Neuanschaffung verkaufen 
wir unser MC-Entwicklungssystem 
PMDSII von Philips incl. Software 
und diversem Zubehör (Z80 und 
8085 Emulatoren) zu einem außeror¬ 
dentlich günstigen Preis. Institut für 
Prozeßtechnik. Tel. (07 21) 6 08-45 25 
od. 45 20. 0 

Sharp MZ 731-1A, io. Tel. (07 11) 
4 20 22 31. 


Kaypro 4/84, incl. Software 2500 
DM VHB. Tel. (0 61 33) 5 05 25. 


IBM-PC-XT2 Disk., Laufwerke + 
10 MB, Platte, 512 KB a. Speicher, 
Monochr., Farbbildschirm, Drucker, 
etc., etc., VB 8200 DM. Chiffre 092572. 


Alphatronic P3, 2 Laufw. ä 760 KB, 
2500 DM. Tel. (0 20 54) 8 32 75. 


Commodore C64/C128/VC20 

User! Lichtgriffel mit Programmen 
und dt. Anleitung nur 49 DM. Ver¬ 
sand gegen Scheck/Nachnahme. 
Fordern Sie unseren kostenlosen 
Commodorezubehörprospekt an. 
Firma Klaus Schißlbauer, Postfach 
11 71C, 8458 Sulzbach, Tel. (0 96 61) 
65 92 bis 21 Uhr. 0 

XT-komp. mit 2 AT-Disk -F Hard¬ 
disk Farbmonitor etc., VB 16 000, 
Apple 2 komp. 2 Disk, Z80, 80Z, 
FDC-Kontroller, Stahlbl. Gehäuse, 
etc ., SW VB 2200, Harddiskkon- 
troller für Apple 2, (Frank -F Britting) 
VB 900 DM. Tel. (0 76 21) 4 65 78. 

Apricot PC, 2 x 720K 9"-Mon. DOS 
211 WS, DB, SW, SC nur privat 
gebr., wg. Syswechsel, DM 5900. 
Tel. (04 21) 32 31 80. 

MAG PC 256, zu verk., IBM-kompat. 
256K, Color Mono, Karte, 1 FD 360K, 
Dt. Tastatur nur 2500 DM. Tel. 
(0 51 54) 14 95, Lutz verlangen! 

Schneider 6128, Drucker, Hand¬ 
büch., Disket. 1 A-Zust. Tel. (0 93 23) 
37 49. 


CBM SFD 1001, 1 MB formatiert 
mit C64/128-Interface, kompl. Ga¬ 
rantie 11/86, (0 96 21) 8 15 40 oder 
(09 41)3 19 64. 695,- DM. 


TA PC8-F orig. Lit. da Zeitmangel, 
zu verk. VB 400 DM. Tel. (0 69) 
88 40 06. 

IBM Portable PPC, 7 Monate alt 
m. 576KB-RAM, 2 x 360 KB-Lauf- 
werke V24 und Parallel-Schnitt¬ 
steile, zus. VB 6450 DM, dazu di¬ 
verse Programme. Tel. (0 81 22) 
78 19. 


CBM 3032 + 3022 mit Notstrom für 
30 Min., Schallschluckgeh., Disk- 
contr. für 2 ★ 400K eingeb., VHB 700 
DM. Tel. (0 91 31) 30 17 62. 0 

Reko Electronic 

Computer-Systeme, MSX-Hard-/ 
Software und Zubehör. Reinhard 
Korfmann, Postfach 32 24, 5810 Wit¬ 
ten 3. 0 
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Biete an 
Hardware 


Apple III incl. Monitor 2. Laufw. 
Parall-K.CP/M-K. Apple Il-Emula., 
MBASIC Visicalc usw., 3000 DM. Tel. 
(0 41 01)6 16 67. 

HP 110, Portable, Lotus 1-2-3, Dis- 
kettenlw. Matrixdrucker, neuwertig, 
VB 4500 DM. Tel. (0 89) 16 16 77. 

Sony Hit Bit -f Sanyo Farbmon. CD 
3195A zu verkaufen. Tel. (0 72 51) 
45 45. 

Apple II mit Language-Card, 2 LW, 
Druckerinterface, Monitor, Pascal, 
Handb., 2000 DM. Tel. (0 89) 71 88 03. 

PX8, 1450 DM, MID. Tel. (05 11) 
8 09 21 61. 


Apple 2+ Komp. 3 LW (143/640 
KB), 80Z, Z80, 2 Contr. Uhr, IBM- 
Geh. Mon. SW, Lit., Preis VB. Tel. 
(02 28)61 17 12. 

Atari 600XL/800XL/130XE Userl 
Lichtgriffel mit Programmen und 
dt. Anleitung nur 49 DM. Versand 
gegen Scheck/Nachnahme. Info 
gratis! Fa. Schißlbauer, Postfach 
11 71A, 8458 Sulzbach, Tel. (0 96 61) 
65 92 bis 21 Uhr. 0 

IBM-Kompatible, komplett, 1999 

DM. Tel. (0 23 51) 7 82 21, ab 18 h + 
Sa/So. 0 

Sirius 1 m. 2 x 12 MB-Floppy u. div. 
Software (Wordstar, dBase I, Vi- 
deothekprogr.), Preis VB. Tel. 
(05 71) 5 73 53. 


■ Computerkauf ■ 

■ leicht gemacht ■ 

■ Wir finanzieren Ihren Compu- ■ 

■ ter und Zubehör. Info anfor- ■ 

■ dern! Auch für Händler inter- ■ 

■ essant. ■ 

■ SKG Bank, Postfach 321, ■ 

■ Cecilienstr. 4, 6600 Saar- ■ 

■ brücken, Tel. (06 81) ■ 

■ 30301 11. □■ 


Disketten 

574" 48 tpi 1,99 DM 

372" 135 tpi 4,65 DM 

auch andere, 6 Mon. Garant. 
Allg. Austro-AG, Ringstr. 10, 
D-8057 Echingen, Tel. (0 81 33) 
61 16. 0 


C16/116, RAM-Erweiterung, 64 
KByte, interner Umbau, Ports blei¬ 
ben frei ★ Basic V 3.5 60671 Free ★ 
Computer mit 100 DM einsenden an: 
Uwe Peters, Tannenweg 9, D-2351 
Trappenkamp. 1 Woche Ret. Preis, 
incl. Mat. Arb. Vers.kost. 

■ 64-KByte-Speicher f. C16 ■ 
Bausatz/Fertig für 84/131 DM, 
Einbau-Service f. C116 & 16, 

87 DM, 

lEC-Bus f. C116, 16 + 4; C64, C128; 

RS232 f. C116 & CI 6. 

Infos von SAS-Bernd, Langgasse 
93, 5216 Niederkassel 5, Tel. (02 28) 
45 26 26. 

■ und mehr für Commodore ■ □ 


★★★★★★★★★★★★★★★★ 

★ CBM-Drucker, MPP 1361,150 ★ 

★ Z./s. Breitwagen z. Höchstge- ★ 

★ bot. Tel. (0 61 57) 8 31 68. ★ 

★★★★★★★★★★★★★★★★ 
★★★★★★★★★★★★★★★★ 

★ Compaq Desk pro 20-MB- ★ 

★ Platte, 360-KB-Diskette, 25- ★ 

★ MB-Band-Laufwerk, parallel, ★ 

★ serielle Schnittst., Monitor ★ 

★ bernstein. Dreh-Tastatur, 9900 ★ 

★ DM. Tel. (0 61 57) 8 31 68. ★ 

★★★★★★★★★★★★★★★★ 

Apple Ile, 128K, Duodisk, Monitor, 
Akustikkoppler, Interf., 802, 280, 
Clock, IEEE 488, Centr.-Interface, 
Joystick, Softw. + Lit., kompl. 2850 
DM. Tel. (0 30) 6 62 27 12. 

Amiga, 256K, 1 + 2 MB Speicher- 
erw., Floppy, Software. Tel. 
(0 60 31) 6 19 50. 

Altos 8000-10E, ADDS, 3200 DM, 
Altos 8000-6S, ACS 8000-6SE-, F. 
Platte, Streamer, Visual 200, 3600 
DM; Altos 5-5, 10 MB, Visual 200, 
2900 DM, Tel. (0 61 32) 5 89 24. 0 


■ Schweiz: MCS-Disketten, ■ 

■ made in Switzerland, die Be- ■ 

■ sten, alle Formate zu Top-Prei- ■ 

■ sen bei Krummenacher-Com- ■ 

■ puter, CH-Tel. (01) 7 40 29 77. ■ 

■ 0 ■ 


PC-Zubehör, preiswert. Tel. 
(0 73 61)6 43 64. 0 


wiesemann & itv 
theis gmbh Y?|« 

MIKROCOMPUTERTECHNIK wff 

... Der Schnittsteilen-Spezialist! 

Komfortdrucker 
an Ihrem 


C64 


Es wäre absurd, spezielle Garagen für Kleinwagen zu bauen. 
Irgendwann ändert sich der Bedarf und die teure Anschaffung 
wird wertlos. Im Homecomputer-Bereich hat sich das noch nicht 
herumgesprochen. Hier werden munter Drucker produziert, die 
man tatsächlich nur an einen einzigen Computertyp anschließen 
kann. Bei einem Systemwechsel, Anschaffung eines zweiten 
Computers oder einfach bei steigenden Ansprüchen muß man 
einen neuen kaufen. 

Besser ist, gleich ein paar Mark mehr anzulegen 
und einen Universal-Drucker zu kaufen. 

Den kann man heute und morgen 
an praktisch alle Computer 
anschließen. 

Ohne Umbau, 
einfach umstecken! 

Beispiel: 

C 64/Centronics-lnterface 
mit 8 kByte Buffer 278,— DM 
ohne Buffer 198,- DM 


Neuer Preis! 


Winchenbachstraße 3-5 

Telefon 

Telex 

^5600 Wuppertal 2 

(0202) 505077 

8591656 wwd ^ 


Biete an 
Software 


520 ST Prg-Verkauf Info 80 Pf, 
U. Ton, Kantstr. 35,4005 Meerbusch. 

Haustechnische Programme für 
Sharp PC 1260 und kompatible Heiz- 
last-Rohrnetz-Heizkörper, Druck¬ 
ausdehnungsgefäße, Info bei Ego, 
Postfach 138, 1210 Wien. 

Sharp PC-1500 (A): Extra-RAM i. 
ROM, Bereich neue Befehle, Soft- u. 
Hardware-Erw., kostenl. Info, Ch. 
Germeimann, Pf. 345, 3422 Bad Lau¬ 
terberg 1 

Cobol-Compiler, Alphatronic P3 
600 DM, Tel. (0 20 54) 8 32 75. 


Cobol-Compiler für Apple III 
250 DM, Tel. (0 20 54) 8 32 75. 

Headline das universelle Druck- 
und Gestaltungsprogramm für Ma¬ 
trixdrucker! Tel. (07 21) 88 76 21. 0 

Maskengenerator für alle Turbo- 
Programmierer. MS-DOS-DEMO 20, 
- ab 19 Uhr Tel. (0 52 42) 3 57 60. 


dBase-Anwendungen. 

Tel. (0 23 51) 7 82 21. 0 

-Grafikprogramme- 

Für C 64 und IBM. 

Verschiedene Programme zur Aus¬ 
wahl. Ausführliche Beschreibung 
und Demodiskette gegen 10,— DM 
in bar bei M. Schulz, Kleiststr. 5, 
1000 Berlin 30. 0 


X^\\\\\\UUUIIIIIII/ 

ixV IBM-XT-kompatibel 


■XT-kompatibel 

ICO 360 1282.- 

Rechner mit XT-Mainboard 256 Colorkarte. 
1 Disk Drive a 360 KB, deutsche Tastatur. 


ICO 720 


1559.- 


wie ICO 360, jedoch mit 2 Disk Drives mit zu¬ 
sammen 720KB^__ _ 

ICO 20 MB 2191 — 

wie ICO 360 jedoch mit 20-MB-Festplatte. ||||||||f■ 

22-MB ■Festplatte 1449- 



YJl ni 

7 Monate 

Versand erfolgt per NN oder Vorkasse. 


UJJLL±±LLLU. 

7 Monate Garantie. 



Sie haben einen Apple ... 


wir haben die 
Software ... 


wir haben die 
Bücher... 



und die 
Hardware ... 


und die 
Zeitschriften *.. 


*Fordem Sie unseren Gratiskatalog an! 

Panda^#Ftor Ing Eden 


Uhlandstraße 195 • D-1000 Berlin 12 
Tel.: 030/31 04 23 • Telex 185 859 
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HC-BÖRSE 


Biete an 
Software 


Schneider CPC. Gratisinfo bei 
Friedr. Neuper, PF 72, 8473 Pfreimd. 

□ 


• Können Sie Schreibmaschine # 

• schreiben? • 

• Keymaster, der Schreibma- • 

• schinenkurs für den CPC 464. • 

• Deutscher Zeichensatz, 56 KB • 

• Programmlänge, 49 DM + • 

• Porto. U. Keim, An d. Waldes- • 

• ruh 5, 6400 Fulda-Niesig. • 


NEU NEU NEU NEU NEU 
Hacker-Buch nur 38 DM bei VS bei 
NN + Gebühr. Info gegen 80 Pf. Op¬ 
permann, Walldürner W. 24, 1000 
Berlin 20. 

NEU NEU NEU NEU NEU 


CBM 80XX: Spitzenprogramme al¬ 
ler Art! Gratisliste bei Thomas 
Liedtke, 7140 Ludwigsburg, E.-Bälz- 
Str. 17. 

MZ-700/800 Besitzer! Fordern Sie 
unseren Softwareexclusivkatalog 
an. Natürlich gratis! Nur bei AM 
Technologies c/o A. Mielke, Vinn- 
horster Weg 35, 3000 Hannover 21. 
Superpreise! (Händler). 0 


BZ-Homöopathie für Commod. 
128 — auch für den an Naturheil¬ 
kunde inter. Laien sehr wertvoll, 
(auch Vers. f. C64 lieferb.), kennen 
Sie schon unsere prof. Software 
(C64) aus den Ber. Astrologie, Bio¬ 
rhythmik, Heilpraktikerprüf. u. Per¬ 
sönlichkeitsanalyse? Info v. Beate 
Zille, Berger Str. 272, 6000 Frankfurt 
60_ 0 

★ ★ Schneider-Software ★ ★ 

preisw. Spiele, Mathe, Anwend. 
(z.B. Minivisicalc), Katalog g. 1 DM 
von Schneidersoft, Wagner, Gar- 
tenstr. 4, 8201 Neubeuern. 

Wärmebedarfberechn. 4701/83 

K-Zahlberechnung DIN 4701/83 

Rohrnetzberechnung-Programm 

Druckausdehnung 

Für VC64 + 1541 + Drucker, je 100 

DM, vom Fachmann privat. Tel. 

(0 40) 6 72 46 46. 

Amiga Software 

Public Domain Software für Amiga 
aus den USA, je Disk 20 DM. Kopier¬ 
service Public Domain Software 
Christian Bellingrath; Trift 10, 5860 
Iserlohn. Tel. (0 23 71) 2 41 92. 0 

Sharp-Pocket, Computer-Bücher. 
Bestellen Sie sich passend zum 
Rechner Ihre Literatur. Fordern Sie 
noch heute für 80 Pf Rückporto eine 
Liste der gesamten Angebote. Op¬ 
permann, Walldürner W. 24, 1000 
Berlin 20. 


Public Domain Software aus 
USA 

679 Disks für IBM 
246 Disks für CPM 
88 Disks für C 64 
10 Disks für C 128 
10 Disks für Amiga 
Preise: IBM je 15 DM, CPM u. C64 je 
10 DM, C 128 je 12 DM, Amiga je 20 
DM, günstige Mengenrabattstaf¬ 
feln, z.B. 88 C64 Disks 600 DM, 200 
PC-Blue 1500 DM. Katalog auf Dis¬ 
kette für IBM (3 Disks) 25 DM, CPM 
Katalog auf Disk 10 DM, C64/128/ 
Amiga Liste 80 Pf. Rückporto. Ko¬ 
pierservice Public Domain Soft¬ 
ware. Christian Bellingrath, Trift 10, 
5860 Iserlohn, Tel. (0 23 71) 2 41 92, 
Telex 8 27 937. 0 

C64, CI28, CI6/116, VC20. Neue 
ernsthafte Programme, z.B. Textver¬ 
arbeitung, Katalog gegen 2 x 80 Pf 
in Briefm., Computerservice T. Hof¬ 
stede, A. d. Windmühle 8, 5010 
Bergheim. 0 

Für Commodore 8000: 

Programmierer-Softwaretools u.a. 
Hilfsprogramme abzugeben. Chiffre 
092562. 

CBM 8096-SK/8250 mit SW. Lager¬ 
verwaltung, Buchhaltung, Textver¬ 
arbeitung und Kalkulat. einzeln oder 
zus. Chiffre 092560. 

PC + CP/M + Frei-SW. Tel. 
(0 23 51) 7 82 21,18 h. 0 


Suche 

Hardware 


CBM-IBM-Hardware sucht 

0407607333. 


Suche Epson-FX80-Dru + Fischer¬ 
technik für CBM-IBM. 0407607333. 


Sharp MZ 80 A + 80 FB gesucht! 
Tel. (044 31) 12 12. 


Suche Kartenleser/Lochkartenle¬ 
ser (auch defekt). J. Steltner, All- 
mersstr. 10, 3000 Hannover 1, Tel. 
(05 11) 88 12 10. 

SX-64 gesucht. Angebote an Eber¬ 
hard Müller, Wisentweg 5, 7000 
Stuttgart 31, Tel. (07 11)86 15 64. 

ATARI-Software für XL/XE-Rech- 
ner. Viels. Anwendungen, enorm 
preisw. C/D. Kostenl. Info bei H. Ke¬ 
gel, Am Erlenberg 13,6107 Reinheim. 


Suche 

Software 


Suche Hausverwaltungspro¬ 
gramm f. Commodore PC 10, IBM 
komp. Tel. (0 60 32) 8 56 10). 


Auftragscoupon für Kleinanzeigen in HC-BÖRSE 

gezielt und kostengünstig ■ kaufen Gewerbliche Gelegenheitsanzeigen Private Gelegenheitsanzeigen je 

■ verkaufen je Druckzeile 11,50 DM zuzügl. MwSt. Druckzeile 7,50 DM inkl. MwSt. 

■ tauschen 

■ Kontakte knüpfen 

Bitte ausschneiden (fotokopieren) und ausgefüllt an HC-Börse, Postfach 67 40, 8700 Würzburg schicken! 


Q 

<-- 


1 


Lesernummer 

1 1 1 


Bitte veröffentlichen Sie in der nächsterreichbaren Ausgabe nachstehenden Text: 


Absender 

i i Li i i i i i i i 

1 1 1 

1 

i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i 

Vor- und Zuname 



i _ i _ i _ i _ i _ i _ i _ i _ i _ i _ i _ i _ i _ i _ i _ i _ i _ i _ i _ i _ i _ i _ i _ i _ i _ i _ i_i_i_i_i 


Beruf 

i _i j _ i _ i i i i i i i i 

1 1 1 


1_1_i_i_1_1_1_1 _ i_1 _ l_Üi _ l _ 1 _ 1_1 _ 1 _ 1 _ l_1 _ i i i i i i i _ i i i i 


Straße und Nr. 

1 _ 1 _ 1 _ 1 _ 1 _ 1 _ 1 _ 1 _ 1 _ 1 _ 1 _ 1 _ 1 l 

1 1 1 


1 _ i _ i _ i _ i _ i _ i _ i _ i _ i _ i _ i _ i _ i _ i _ i _ i _ i _ i _ i _ 1 _ i _ i _ 1 _ i _ 1 _ 1 

Wohnort 

i i i i i 



i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i i 

PLZ 

Bitte veröffentlichen Sie nebenstehenden Text 

irrm 7oilon a PlK/T in Hör när<Viot_ 


i i i i _ i _ l _ 1 _ l _ 1 _ l _ l _ i _ i i i i i < i i i i i i i i i i i i i 
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erreichbaren Ausgabe von HC 



30 Buchstaben je Zeile, inkl. Satzzeichen und Zwischenräumen, bei normaler Schrift. 

Bei Fettdruck, grafischen Zeichen usw. müssen wir uns Abweichungen Vorbehalten. 

Gewerbliche Anzeigen werden mit 0 gekennzeichnet. 

□ Biete an □ Suche □ Verschiedenes 

□ Hardware □ Hardware □ Kontakte 


Bei Angeboten: 

Ich bestätige, daß ich alle Rechte an den 
angebotenen Sachen besitze. 

i 

1 




1 


Unterschrift 

Datum 


□ Software □ Software Chiffregebühr 6 DM inkl. MwSt. 


86 HC 
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HC-BÖRSE 


Suche 

Software 

Software vom TI-59 im IBM-PC? 

Suche Soft- u. Hardware um Modul- 
u. Magnetkartenprogramme in 
GW-Basic zu transferieren. B. Heu- 
chert, Teichredder 9, 2351 Husberg, 
Tel. (0 43 21) 2 87 99. 


S. Fibu f. CBM 3032. Tel. (0 40) 
7 96 42 13. 


Fibu für Sirius 1, bis 500 DM. Tel. 
(05 71) 5 73 53. 


Suche Apple-Works mit Beschrei¬ 
bung. Tel. (02 03) 43 42 03. 


★ Programme gesucht: ★ 

Für eine Veröffentlichung suchen 
wir gegen Honorar Programme, vor¬ 
zugsweise Grafik-Anwendungen so¬ 
wie Nutzprogramme mit Pfiff für 
Schule, Beruf und Freizeit — für 

★ Sharp MZ 700/800 

★ Epson HX 20 

★ UCSD- und Turbo-Pascal 

Die besten Chancen, gut honoriert 
und publiziert zu werden, haben auf 
Datenträger eingereichte Pro¬ 
gramme mit ausführlicher Beschrei¬ 
bung. Einsenden an: Vogel-Verlag, 
z. Hd. Herrn Armin Schwarz, Schil- 
lerstr. 23a, 8000 München 2. 0 


Kontakte 


PC Software erstellt: M. Morgen- 
roth, Tel. (02 02) 71 34 12. 


Achtung Amiga-Fans! Suche Kon¬ 
takte im Großraum 4300 Essen. Bis 
dann! Rainer. Chiffre: 092575. 

Amiga-Einsteiger sucht Kontakt 
zwecks gegenseitiger Hilfe. R. Do- 
liwa, 4 Düsseldorf 1, Heresbach- 
str. 2, Tel. (02 11) 34 92 39. 

Olivetti M20 Freaks für Multiplan, 
Oliword u. Faktura gesucht. Wer 
kann PCOS/BASIC programmieren? 
M20 Software anbieten. Raum Ffm. 
Unterstützung gegen Std.-Lohn f. 
meine M20 FDN/HDN gesucht. Wer 
kann Modem-Übertragungssoft¬ 
ware zw. 2 M24 anbieten oder ent- 
wicekeln? Tel. (0 69) 39 80 44 u. 
31 82 10. 

Sharp Hisoft Pascal Klub e.V. 
Wir Pascalieren! 

Egal ob mit Hisoft- oder Turbo-Pas¬ 
cal, ob Anfänger oder Kenner, wir 
bieten Interessierten ein Forum zum 
Erfahrungsaustausch an. Unsere 
Klubzeitschrift berichtet stets aktu¬ 
ell und behandelt auch u.a. Basic u. 
Assembler mit, dazu gibt es neue 
Sharp-Informationen. Gegen 3 DM 
in Briefm. erhalten Sie ein Probe¬ 
exemplar zugesandt. Bei Fragen 
stets Porto beifügen. SHKe. V., V. 
Petersen, Behringstr. 23, 2000 Ham¬ 
burg 50, Tel.: (0 40) 3 90 14 05. 


Chinesisch und/oder Japanisch f. 
Studienzwecke von privat gesucht: 
Sprach- bzw. Schriftlehrprogramme 
einschließlich Textprogramm 

(KANZI/KANJI/KANA). Erläuterung 
auf Engl, angenehm. Besitze SX 64/ 
Epson GX80, würde Hardware zu¬ 
kaufen. Musterausdr! An Postfach 
15, CH-4059 Basel. 

Suche Kontakt zu Amiga-Usern, 
auch Anfängern, zwecks Hard-Soft- 
ware u. Infotausch. Tel. (0 60 31) 
9 1301. 


„Hilfe" 

Gezöcht: Het Adres van de Gebrui- 
kers Groep van de Sharp MZ-700. 
Sturen Naar: P. v. Klaveren, Grove- 
stins 10,7608 HM Almelo, Nederland. 


Verschiedenes 


Anrufbeantworter o. FTZ-Nr. 

398 DM 

Anrufbeantworter m. FTZ-Nr. 

698 DM 

per NN Reising, Füllengarten 52, 
6600 Saarbrücken 5, Tel. (06 81) 
7 94 89. 

Commodore-Service-Manual's für 
alle Typen liefert ab sofort: Schal¬ 
tungsdienst Lange Berlin, PF 
47 06 53, D-1000 Berlin 47, Tel. (0 30) 
6 03 20 03, Telex 1 84 339. 0 


HC 11/83-11/85 gg. Gebot! A. Zan¬ 
der, Mainzer Str. 4, 1000 Berlin 31. 

Preiswerte Hard-/Software für 
Home- und Personal-Computer. 

K 8i N, Pf. 90 08 06, 2100 Hamburg, 
Tel. (0 40) 7 63 13 65. 0 

Programmierung von Tools- und 
Anwendungen in allen Sprachen. 
Vehrenberg, Blücherstr. 42, 4000 
Düsseldorf 30, Tel. (02 11) 44 60 18. 


* CP/M-Tips gesucht * * 

Helfen Sie uns, die Geheimnisse 
des Betriebssystems CP/M zu lüf¬ 
ten. Gesucht sind gegen Honorar 
Tips, Tricks, Utilities und Back¬ 
ground-Informationen in Form von 
Kurzbeiträgen mit Listing auf Daten¬ 
träger, lauffähig auf einem gängi¬ 
gen Rechner. 

Einsenden an: Vogel-Verlag, z. Hd. 
Herrn Armin Schwarz, Stichwort: 
CP/M-Special, Schillerstr. 23a, 8000 
München 2. □ 

* MS-DOS-Tips gesucht * 

Helfen Sie uns, die Geheimnisse 
des Betriebssystems MS-DOS zu 
lüften. Gesucht sind gegen Honorar 
Tips, Tricks, Utilities und Back¬ 
ground-Informationen in Form von 
Kurzbeiträgen mit Listing auf Daten¬ 
träger, lauffähig auf einem gängi¬ 
gen Rechner. 

Einsenden an: Vogel-Verlag, z. Hd. 
Herrn Armin Schwarz, Stichwort: 
MS-DOS-Special, Schillerstr. 23a, 
8000 München 2. □ 


Bausatzkatalog * 300 Seiten * 
gratis * Porto + Vers., 6 DM. Lieb¬ 
herr elect., 8353 Osterhofen. □ 



VOGEL 

Computerbücher 


Rügheimer, H. 
Spanik, Christian 

Mein zweites 


Commodore 64-Buch 

Das Buch, das nach dem Handbuch 
kommt 

Reihe HC - 

Mein Home-Computer 

280 Seiten, 23 Abbildungen, 

38,-DM, 1985 
ISBN 3-8023-0793-3 



Möchten Sie Ihren Commodore 64 
programmieren? Mit diesem locker 
geschriebenen Buch lernen Sie 
spielend, die Programmstruktur zu 
verstehen. Einfache, nützliche Bei¬ 
spiele erklären die Fähigkeiten Ihres 


C 64. Sie sind übersichtlich - so 
haben Sie die Möglichkeit, die 
Programme zu verändern, was letzt¬ 
lich Sinn der Sache ist. Sie sollen 
Ihre eigenen Programme schreiben 
können. 

Sinclair, lan 

Mach mehr aus Deinem 

Commodore 64 

Start in die Maschinensprache 

Reihe HC - 

Mein Home-Computer 

180 Seiten, 69 Ab¬ 
bildungen, 33,-DM, 1985 

ISBN 3-8023-0808-5 
Wer den Maschinencode dieses 
Commodore 64 beherrscht, dringt 
in die Tiefe des Rechners ein. 
Dieses Buch zeigt dem Anwender 
Einzelheiten der Arbeitsweise des 
Computers. Dadurch kann er als¬ 
bald leistungsfähigere Programme 
schreiben, ohne sich allzusehr mit 
dem Maschinencode beschäftigen 
zu müssen. Er kann einfache 
Assembler-Programme lesen und 
BASIC-Programme dadurch 
straffen. 

Sie erhalten bei Ihrem Buch- und 
Computerfachhändler kostenlos das 
neue Verzeichnis „Vogel-Computer- 
bücher“. 


VOGEL-BUCHVERLAG 

WÜRZBURG 


[ VOGEL—Computerbücher 
J mehr wissen, mehr leisten 
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PREISRÄTSEL 


Flachbettplotter HPX-84 
zu gewinnen 


Es geht darum, einen 
Begriff aus der Com¬ 
puterwelt zu erraten. 
Der Hauptgewinn 
wird unter den Ein¬ 
sendern verlost. 


Einsendeschluß: 15. 9. 1986 (Da¬ 
tum des Poststempels). Die Ge¬ 
winner werden unter Ausschluß 
des Rechtsweges ermittelt. Die 
Namen werden in HC 12/86 veröf¬ 
fentlicht. Mitarbeiter des Vogel- 
Verlages und deren Angehörige 
sind von der Teilnahme ausge¬ 
schlossen. 


Die Preise 

Zu gewinnen gibt es einen HPX- 
84-Flachbettplotter sowie zehn in¬ 
teressante Bücher aus der Welt der 
Mikrocomputer und Elektronik. 



Der Flachbett¬ 
plotter HPX-84 
für den Gewin¬ 
ner dieses Rät¬ 
sels: präzise 
und leise. 
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Wir haben uns eine knifflige Auf¬ 
gabe für Sie ausgedacht. In die 
waagerechten Reihen sind Wörter 
einzutragen. Nach richtiger Lö¬ 
sung steht in der mittleren Senk¬ 
rechten ein Begriff aus der Daten¬ 
verarbeitung. Schreiben Sie das 
Lösungswort auf eine Postkarte, 
und senden Sie diese an: 
HC-Redaktion 
Kennwort: Plotter 
8000 München 100 


Die Fragen 

1. Himmelsgewölbe 

2. Rindslendenstück 

3. Wissenschaftlicher Mitarbeiter 

4. Feinste Tonware 

5. Ind. Kaste 

6. Waldfrucht 

7. Verstand 

8. Europ. Hauptstadt 

9. Regierungsform 


Das bietet der HPX- 
84-Plotter 

- Centronics-Schnittstelle 

- Bis 32 767 horizontale und vertikale 
Schnitte 

- Fertige Befehle für Rechtecke und 
Kreise 

- Papiergröße bis DIN A3 

Der Plotter wurde von der Firma Pe¬ 
ter Habersetzer gestiftet. 


Die Auflösung des Ariola-Preisrätsels: 


Eine Glücksfee hat uns aus den 
vielen richtigen Einsendungen 
zum Preisrätsel aus HC 6/86 den 
Hauptgewinner und die Gewinner 
der zehn Buchpreise gezogen. Die 
richtige Lösung heißt: 

KONRAD ZUSE. 

Der 1. Preis, ein Spielepaket von 
Ariolasoft, geht an: 


Norman Reil 
Augsburger Str. 58/2 
8034 Germering 2 

Die zehn Buchpreise erhalten: 
Günter Bormes, 5523 Röllersdorf 
Detlef Bußmann, 4600 Dortmund 
30 

Elli Hiller, 7032 Sindelfingen 
Gerhard Höllisch, 8952 Marktober¬ 
dorf 


Michael Jung, 4750 Unna-Königs- 
born 

Olaf Kunkel, 4100 Duisburg 25 
Ferdi Ried, 5330 Königswinter 1 
Hugo Schulz, 2000 Hamburg 62 
Annegret Weinberger-Groß, 7147 
Hochdorf 

Wolfgang Zupp, 3012 Langenha¬ 
gen 

Herzlichen Glückwunsch! 
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/DATA BECKER BuChhitS 

zu Commodore C16 und Plus/4 

/ X X X / > X X _ ^^^ 
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C 16 

fÜBBWSTB'GEH 


Bafoui 


Ob 


iEDVl 


cie 

Tips & Thck* 


Fund B'“bm für dmn 

Commodon» 1BAnw,M. r 


emDATA BECKE« BUCH |j| ^^ ^ 


Mit diesem Buch zu Ihrem C16 verfügen Sie über eine leichtverständliche Ein¬ 
führung in Handhabung, Einsatz und Programmierung des C16, die keinerlei Vor¬ 
kenntnisse voraussetzt. Themen: Bedienung von Tastatur und Editor, erster Befehl 
und erstes Programm, BASIC-Einführung mit Erstellung einer kompletten Adressen¬ 
verwaltung! Nur der richtige Einstieg garantiert den späteren Erfolg! 

C16 für Einsteiger, 205 Seiten, DM 29,- 


Haben Sie einen C16/116 und kein Futter für ihn? Dann kann Ihnen mit diesem 
Buch geholfen werden. Aus dem Inhalt: Spiele, Malprogramm, Laufschrift, Textverar¬ 
beitung, Dateiverwaltung, Vokabeltrainer, Text-Hardcopy, Merge, Shape-Editor, simu¬ 
lierter Direktmodus, der integrierte Monitor, Zeropage, Routinen des Betriebssystems 
und des BASIC-Interpreters. 

Dieses Buch gehört griffbereit neben Ihren Rechner. 

C16 Tips & Tricks, 201 Seiten, DM 29,- 



DAS BASIC BUCHE / ""■» 

I&A& 


EIN DATA BECKER 


ens Prach e 


Klar und ausführlich werden die Möglichkeiten der Grafikpro¬ 
grammierung auf den Rechnern C16/C 116/Plus/4 vorgestellt. 
Die Grafikbefehle des BASIC 3.5 werden mit vielen Beispielen 
verdeutlicht: Färb-, Multi-, Color- und Hi-Res-Modi, Befehle zur 
Steuerung von Grafik und Shapes, 2D-/3D-Programmierung, 

CAD und Statistik. Mit diesem Buch lernen Sie Ihren Rechner von 
seiner stärksten Seite kennen. 

Das Grafikbuch zu C16 - C116 Plus/4, ca. 300 Seiten, 

DM 29,-. Erscheint ca. August 

Machen Sie mehr aus Ihrem Rechner! Anhand vieler Programmbei¬ 
spiele führt der Autor in den Befehlssatz der Rechner C 16/C 116/ 
Plus/4 ein: Ein-/Ausgabe mit Input/Print, Rechnen mit Variablen, 
Stringverarbeitung, Verzweigung und Schleifen, Grafik- und Musik¬ 
programmierung, komplette Befehls-Übersicht. Für Einsteiger und 
Fortgeschrittene gleichermaßen interessant. 

Das BASIC-Buch zu C16 * C116 Plus/4, ca. 250 Seiten, DM 29,-. 
Erscheint ca. August 

Programmierung in Maschinensprache - leichtgemacht. 

Der Befehlssatz des Prozessors, die Verwendung des TED-MON, die 
wichtigsten Routinen des Betriebssystems. Auf diese Weise können Sie 
das Know-how, welches in Ihrem Betriebssystem steckt, in Ihre eigenen 
Programme integrieren. 

C16 • C116 • Plus/4 Maschinensprache, ca. 300 Seiten, DM 29,-. 
Erscheint ca. August 
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Tips 
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Wer seinen Commodore Plus/4 richtig nutzen will, der kommt an diesem Ideenbuch 
nicht vorbei. Aus dem Inhalt: Was ist eine Textverarbeitung, welche Vorteile bietet 
sie, Installation der Plus4-Software, Serienbriefe, Steuerzeichen, Peeks und Pokes, 
Balkengrafik, Funktionsplotter, Dateiverwaltung, Listing der Zero-Page (Systemspei¬ 
cher), u.v.m. Gehört zu jedem Plus/4! 

Effektiv & Kreativ mit dem Commodore Plus/4, 

244 Seiten, DM 49,- 


Commodore Plus/4 Tips&Tricks enthält eine hochkarätige Sammlung 
von Anregungen, Ideen und fertigen Lösungen zur Programmie¬ 
rung Ihres Plus/4: Anwenderprogramme aus den Bereichen 
Unterhaltung, Grafik, Text- und Dateiverwaltung. Viele Utilities 
wie Text-Hardcopy, REM-Killer, Mergen, Shape-Editor und 
Datumsberechnung. Die wichtigsten Zeropageadressen 
und Betriebssystemroutinen führen hin zur Pro¬ 
grammierung in Assembler. Eine echte Hilfe für alle 
ernsthaften Programmierer. / ^ 

Plus/4 Tips&Tricks, 221 Seiten, DM 29,- 
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Nullmodem: Zwei 25polige Stek- 
ker und ein paar Litzenstücke sind 
alles, was man dafür braucht. Auf 
das ,,Gewußt-wie“ kommt es an 


Ein Nullmodem 
macht es möglich: 

Datenaustausch 
zwischen verschie¬ 
denen Rechnern. 
Und ein Schnittstel¬ 
lentester kann Tele¬ 
fonkosten senken 



NULLMODEM 

UNDIESTER 


Ein Nullmodem ermöglicht es, 
zwei verschiedene Rechner über 
ihre serielle Schnittstelle zusam¬ 
menzuhängen. Wenn auf beiden 
zum Beispiel ein Terminalpro¬ 
gramm läuft, können also Dateien 
vom C64 auf einen IBM-Rechner 
übertragen werden. 

Als Material brauchen wir: 

* zwei RS232C-Stecker (weiblich) 

* Isolierte Litze 

* Lötkolben, Lötzinn 

* Messer zum Abisolieren 

* Schraubenzieher 


Drei Litzen, etwa zehn Zentimeter 
lang, werden auf beiden Seiten ab¬ 
isoliert und mit je einem Tropfen 


Das Nullmodem 
überträgt Daten 

Lötzinn verzinnt, damit sich keines 
der dünnen Kupferdrähtchen selb¬ 
ständig macht. Die beiden Stecker 
werden so gelegt, daß man die ins 


Plastik eingedruckten Numerierun¬ 
gen der Leitungen lesen kann. Auf 
beiden Steckern wird der Pin 7 
(Masse) mit einem Tropfen Lötzinn 
versehen. Beide Masse-Pins wer¬ 
den mit einer Leitung miteinander 
verbunden. Nun kommen die bei¬ 
den wichtigsten Pins der RS232C- 
Schnittstelle: Transmit DATA (TD) 
und Receive Data (RD), also Daten 
senden und empfangen. Es sind 
die Pins zwei und drei, die nun mit 
den beiden übriggebliebenen 
Leitungen kreuzweise verbunden 
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Verdrahtung aus der Nähe: Beim Steckerkauf 
darauf achten, daß auf einen Anschluß mit Stiften 
natürlich ein (weiblicher) mit Buchsen gehört 



Selbstgespräche: Nach dieser einfachen Lötarbeit 
können DFÜ- und Hackprogramme getestet werden, 
ohne daß Telefongebühren anfallen 


werden. Das heißt: Pin 2 am einen 
Stecker wird mit Pin 3 am anderen 
Stecker verbunden und umge¬ 
kehrt. Die Leitung, auf der der erste 
Computer sendet, ist auf die Emp¬ 
fangsleitung des zweiten geschal¬ 
tet (und umgekehrt). 

Eigentlich ist unser Nullmodem 
schon fertig. Was jetzt nur noch 
fehlt, ist der ,,Handshake“, also 
das Verfahren, mit dem die Com¬ 
puter sich gegenseitig mitteilen, 
wann wer empfangs- bzw. sende¬ 
bereit ist. Dies dient dazu, Fehler 
auszuschließen und Datenverlust 
zu vermeiden. Da dieses Verfahren 
aber im Normalfall nicht verwendet 
wird, schließen wir die Leitungen 
kurz, indem wir jeden Computer 
den Handshake mit sich selber 
machen lassen. Dazu setzen wir 
zwischen die Pins vier und fünf mit 
kurzen Litzenstücken und ein paar 
Tropfen Lötzinn in dem Stecker 
eine Lötbrücke. Ebenfalls in jedem 
Stecker werden mit zwei kurzen, 
auf beiden Seiten abisolierten und 
verzinntem Draht die Pins sechs, 
acht und zwanzig miteinander ver¬ 
bunden. Vor dem Zusammen¬ 
schrauben der Stecker muß jetzt 
nur noch die Funktionsfähigkeit 
unseres Nullmodems überprüft 
werden. Am besten sendet man ei¬ 
nen längeren Text mit 2400 Baud 
hin und her. Gibt es Schwierigkei¬ 
ten, dann sind entweder die Löt¬ 
stellen nicht einwandfrei, oder ei¬ 


nes der feinen Kupferhaare hat sich 
doch selbständig gemacht. 


TD :2 — 

RD:3 — 
RTS :4 -> 
CTS:5 - 1 
DSR:6 
7 

DCD: 

DTR :20 - 


"I .o -1 

D:8 —if 



Schaltplan: So sieht die Ver¬ 
drahtung des Nullmodems aus 


Wer an Terminalprogrammen 
strickt oder Mailboxen entwickelt, 
wer Auto-Hacker programmiert 
und NUA-Scanner fabriziert, kennt 
das Problem: Bis das Programm 


Der Schnittstellentest 
erspart das Telefon 


das macht, was es soll, sind viele 
— sinnlose — Telefoneinheiten 
verbraten. Geld, das man besser 
anwenden kann. Zum Beispiel in 
einem Schnittstellenteststecker. 

An Material brauchen wir dafür: 

* einen RS232C-Stecker 

* etwas isolierte Litze 

* Lötkolben, Lötzinn 

* Messer und Schraubenzieher 

* eine Steckerhülle 


Ähnlich wie beim Nullmodem 
geht es bei unserem Schnittstel¬ 
lenteststeckerdarum, den Compu¬ 
ter mit sich selber unterhalten zu 
lassen. Nur kommt jetzt dazu, daß 
die Daten, die der Computer aus¬ 
sendet, auch bei diesem wieder 
ankommen. Deshalb werden jetzt 
miteinander verbunden: Die Pins 
zwei und drei; die Pins vier und 
fünf und die Pins sechs, acht und 
zwanzig. Die nebeneinanderlie¬ 
genden Pins werden wie bekannt 
mit einem gutplazierten Tropfen 
Lötzinn und einem Litzenstück ver¬ 
bunden, zwischen sechs, acht und 
zwanzig tun dieselbe Arbeit zwei 
kleine Drahtstücke. Ist unser Stek- 
ker fertig, sollten die Drähte nur 
noch mit einer Steckerhülle gegen 
unbeabsichtigtes Abreißen ge¬ 
schützt werden. 

Beim C64, der ja bekanntlich 
keine serielle Schnittstelle hat, 
kann unser Stecker seine Arbeit 
aber an dem Modemkabel aus der 
vorletzten Ausgabe tun. Steckt 
man unseren Stecker hinein, so 
passiert folgendes: Jedes Zeichen, 
das getippt und damit über die 
Schnittstelle gesendet wird, wird 
über den Stecker zurückgeschickt 
und erscheint auf dem Bildschirm. 
Ein Autohackeroder NUA-Scanner 
kann so stundenlang und kosten¬ 
los ausprobiert werden, bis er auf 
jede DATEX-Meldung fehlerfrei 
funktioniert . Joachim Graf 
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Prolog gilt als die Sprache von Künstlicher Intelligenz und Experten¬ 
systemen. Von traditionellen Programmiersprachen hebt sie sich 
durch grundlegend andere Denkweisen deutlich ab. 


M it der fünften Computerge¬ 
neration ist vor allem die 
Hoffnung verbunden, daß 
Expertensysteme in den verschie¬ 
densten Bereichen Menschen 
auch auf intellektuellem Gebiet 
entlasten können. Ein Expertensy¬ 
stem kann als Hilfsmittel betrachtet 
werden, menschliche Fähigkeiten 
für ein bestimmtes Spezialistenge¬ 
biet zu speichern und abzurufen. 
In Frage kommen zunächst unter 
anderem die Fehlersuche in tech¬ 
nischen Geräten und Reparaturan¬ 
leitungen, Diagnose von Krankhei¬ 
ten und Behandlungsvorschläge, 
Überwachungs- und Steueraufga¬ 
ben, Vorhersage, Wissensvermitt¬ 
lung. Benötigt werden dabei Fä¬ 
higkeiten wie logisches Schließen 
und der Umgang mit vagem Wis¬ 
sen und dessen Bewertung. 

Typisch für Expertensysteme 
sind nicht mathematisch sichere 
Schlußfolgerungen wie „Wenn 
a >7, dann auch a >5“, sondern 
Aussagen der Form „Wenn x wahr 
ist und y wahr ist, dann besteht die 
Wahrscheinlichkeit P, daß auch z 
wahr ist“. Durch Aufdecken neuer 
Details und Heranziehen zusätzli¬ 
chen Wissens kann eine Aussage 
dann entweder untermauert oder 
abgeschwächt werden. Ein ideales 
Expertensystem sollte dem Benut¬ 
zer auch erklären können, wie eine 
bestimmte Folgerung zustande ge¬ 
kommen ist. Falsch ist es, Exper¬ 
tensysteme mit den Computern der 
fünften Generation zu identifizie¬ 
ren. Prototypen sind schon seit 
Jahren auf den Gebieten Medizin, 


Technik und molekulare Genetik im 
Einsatz. 

Alex Goodall, geschäftsführen¬ 
der Direktor der Gesellschaft Ex¬ 
pert Systems, zum Stellenwert der 
Programmiersprache Prolog: „Je¬ 
der, der auf dem Gebiet der Künst¬ 
lichen Intelligenz neu ist, wäre 
schlecht beraten, wenn er etwas 
anderes als Prolog nehmen würde, 


Fakten, Regeln, 
Beziehungen 



da es einfacher anzuwenden ist als 
LISP und mächtiger als die andere 
Alternative Pop-2.“ Zwei weitere 
Sprachen werden in diesem Zu¬ 
sammenhang noch genannt: VA¬ 
LID und occam. Für sie alle gilt, 
daß sie eine Abkehr von den her¬ 
kömmlichen Programmiermetho¬ 
den bedeuten. In Prolog wird dies 
besonders deutlich. 

Im Gegensatz zu traditionellen 
Programmiersprachen fehlen in 
Prolog fast ganz Sprachelemente, 
die den Programmablauf steuern 
sollen (GOTO, FOR-NEXT, usw.). 
Der Programmierer codiert nicht 
einen Algorithmus, sondern er gibt 
die Fakten, Beziehungen und Re¬ 
geln an, die in der zu beschreiben¬ 
den Problemwelt Gültigkeit haben. 
Im Hinblick auf Expertensysteme 
könnte man auch sagen: Wissen 
mit all seinen gegenseitigen Ab¬ 


hängigkeiten und Vernetzungen 
wird zusammengetragen. 

Ein einfaches Beispiel, in 
„Turbo-Prolog“ geschrieben: 
domains 

Personen, sport = symbol 
predicates 

spielt(personen,sport) 
clauses 

spielt(hans.fussball). 
spielt(susanne,Volleyball). 
spielt(erich,schach). 
spielt(robert.tennis). 
spielt(uta.X) if spielt(erich.X). 
Das Programm informiert darüber, 
welche Sportarten jeder einzelne 
einer kleinen Gruppe von Personen 
ausübt. Im ersten Teil des Pro¬ 
gramms (domains) werden alle 
Objektnamen aufgeführt, die beim 
betreffenden Problem eine Rolle 
spielen, zugleich wird mitgeteilt, 
von welchem Typ sie sind. In unse¬ 
rem Beispiel sind sowohl personen 
als auch sport vom Typ symbol. 
Weitere mögliche Typen sind zum 
Beispiel real und integer. Im zwei¬ 
ten Teil (predicates) werden die 
Namen von Beziehungen aufge¬ 
führt und die Objektnamen ge¬ 
nannt, die dabei verknüpft sind, 
„spielt“ stellt in unserem Beispiel 
eine Beziehung zwischen perso¬ 
nen und sport dar. Damit ist der 
Deklarationsblock abgeschlossen. 
Es folgt der Prozedurteil. 

Im Prozedurteil (clauses) werden 
zunächst vier Fakten mitgeteilt. Die 
fünfte Prozedur ist eine soge¬ 
nannte Klausel, bestehend aus 
Kopf (Konklusion) und Rumpf (Prä¬ 
misse). Sie besagt, daß jeder 
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Sport, der von Erich ausgeübt 
wird, auch von Uta ausgeübt wird. 
Statt if findet meist Verwen¬ 
dung, das die gleiche Bedeutung 
hat, also auch ,.falls“ gelesen wer¬ 
den kann. Der Rumpf einer Proze¬ 
dur ist meist wesentlich komplexer 
und besteht aus einzelnen Litera¬ 
len, die durch logische Operatoren 
verknüpft sind. DieZeichen , und ; 
stehen dabei für das logische UND 
bzw. das logische ODER. In der 
fünften Prozedur taucht die Varia¬ 
ble X auf. Variable werden im Ge¬ 
gensatz zu Konstanten immer groß 
geschrieben. Während Konstante 
für einzelne Individuen oder Kon¬ 
zepte stehen, benutzt man Varia¬ 
ble, wenn zu unterschiedlichen 
Zeitpunkten unterschiedliche Indi¬ 
viduen oder Konzepte gekenn¬ 
zeichnet werden sollen. 

An das compilierte und gestar¬ 
tete Programm können Anfragen 
gestellt werden. Die Aufforderung 
dazu wird in Turbo-Prolog in Form 

von „Goal:_“ ausgegeben. Die 

Eingabe ,,spielt(robert,schach).“ 
zum Beispiel quittiert das Pro¬ 
gramm mit der Bemerkung ,,True“. 
,,spielt(hans,tennis).“ wird mit “no 
solution“ beantwortet, denn aus 
dem Programm geht weder hervor, 
daß Hans Tennis spielt, noch, daß 
Hans kein Tennis spielt. Die Frage, 
ob Uta Schach spielt, ist schon 
nicht mehr ganz so offensichtlich 
zu entscheiden. Das Faktum 3 zu¬ 
sammen mit der Klausel am Ende 
des Programms führen jedoch zum 
Schluß ,,TRUE“. Anfragen können 
auch Variable enthalten. 


Cut stoppt 
Backtracking 


,,spielt(l,schach)“ zum Beispiel 
wird mit 
,,l = erich 

1 = uta 

2 Solutions“ 
beantwortet. 

Eine Fragestellung wie „Welche 
Sportarten sind in der Gruppe alle 
vertreten?“ ist ebenso möglich. 
Dem Fragesteller ist es hierbei an¬ 
scheinend egal, wer jeweils welche 
Sportart ausführt. Die Anfrage an 
das Prologprogramm enthält eine 
sogenannte anonyme Variable, 
das Zeichen_Die Anfrage wird in 


der Form spieltf_,S). eingegeben 

und führt zur Ausgabe 
„S = fussball 
S = Volleyball 
S = schach 
S = tennis 
4 Solutions“ 

Bei so einfachen Programmen 
sind natürlich Ergebnisse leicht 
vorhersagbar, bei komplexeren 
Programmen nicht mehr. Die Aus¬ 
wertungsstrategie von Prolog 
bleibt jedoch immer die gleiche. 

Jede Anfrage läßt sich als Hypo¬ 
these auffassen. Das gesamte Wis¬ 
sen (Fakten, Beziehungen, Re¬ 
geln) wird nun von Prolog nach 
einem Trial- und Error-Verfahren 
durchstöbert, um die Hypothese zu 
beweisen. Dabei wird ständig ver¬ 
sucht, jeweils zwei Prologstruktu¬ 
ren durch geeignete Bindung von 
freien Variablen zu identifizieren. 
Während dies bei ,,spielt(l,fuss¬ 
ball)“ gelingt, weil die Variable I an 
die Konstante hans gebunden wer¬ 
den kann, mißlingt es bei 
,,spielt(uta,Volleyball)". 

Die Suche erfolgt nach dem 
Backtrackingverfahren, das sehr 
zeitraubend sein kann. Jedoch las¬ 
sen sich in die Prozeduren an ge¬ 
eigneten Stellen Cuts mit dem Zei¬ 
chen ! einbauen, wenn dort eine 
weitere Suche sowieso aussichts¬ 
los ist. Bezeichnend für die Denk¬ 
weise in Prolog ist es, daß es auf 
die Reihenfolge der Prozeduren im 
Programm überhaupt nicht an¬ 
kommt. Sie kann beliebig umge¬ 
stellt werden, ohne daß sich an der 
Arbeitsweise des Programmes ir¬ 
gendetwas ändert. 

Obwohl natürlich auch Zuwei¬ 
sungen in Prolog nicht fehlen und 
ebenso Eingabe-, Ausgabe- und 
andere Routinen vorhanden sind, 
muß Prolog Programmierern in tra¬ 
ditionellen Sprachen zunächst als 
Spezialsprache Vorkommen. Die 
ungewohnte Denkweise läßt es un¬ 
möglich erscheinen, zum Beispiel 
auch Spiele effektiv programmie¬ 
ren zu können. Daß es dennoch 
möglich ist, noch dazu sehr kom¬ 
pakt und einigermaßen gut lesbar, 
zeigt das Programm-Listing 
„Türme von Hanoi“ auf Seite 95. 

An diesem Listing ist unter ande¬ 
rem auch zu erkennen, daß Rekur¬ 
sion in Prolog eine große Rolle 
spielt. Welche Gestalt Rekursion in 
Prolog annimmt, soll am Beispiel 
der Warteschleife am Anfang des 
Prozedurteils vom Programm 
„Türme von Hanoi“ erläutert wer¬ 


den. Die Prozedur delay überprüft 
die Prämisse dd(100). 100 stellt 
eine Bindung der Variablen N an 
dd (N) dar. Das führt zur Zuwei¬ 
sung N1 = N —1 und wegen dd(N1) 
zum rekursiven Aufruf der Prozedur 
dd. Die Rekursion wird erst ge¬ 
stoppt, wenn N1=0, denn dd(0):- 
!. hat einen Abbruch zur Folge. Die 
Länge der Pause kann natürlich va¬ 
riiert werden, wenn man 100 durch 
geeignete andere Zahlen ersetzt. 


Stichworte 

Anonyme Variable Die Variable 
,,_", die anstelle einer gewöhnli¬ 

chen Variable benutzt wird, wenn 
die Werte, die die gewöhnliche 
Variable annehmen könnte, nicht 
von Interesse sind. 

Arbeits-File File, in dem das Pro- 
log-Quell-Programm steht, um 
dann compiliert oder ausgeführt zu 
werden. 

Argument Wie Parameter ein Sam¬ 
melname für Objekte und Variable 
einer Relation. 

Backtracking Eine Methode, bei 
der versucht wird, das vorherige 
Teilziel zu erfüllen, wenn das mo¬ 
mentane nicht erfüllt werden kann, 
clause Ein Faktum oder eine Regel 
für eine bestimmte Aussage. 
Dialog-Fenster Das System-Fen- 
stervon Turbo-Prolog, in dem nach 
externen Zielen gefragt wird und 
das die Antwort des Prolog-Sy¬ 
stems darauf präsentiert, 
domain Programm-Teil, der über 
den Typ der Objekte informiert. 
Editor-Fenster Das System-Fenster 
von Turbo-Prolog, in dem zum Bei¬ 
spiel Prolog-Programme eingege¬ 
ben und bearbeitet werden. 
Expertensystem Ein Computersy¬ 
stem, das die Fähigkeit eines Ex¬ 
perten in einem bestimmten (meist 
kleinen) Bereich nachahmt, 
externes Ziel Ziel, das vom Prolog- 
Programm angefordert wird und 
der Benutzer im Dialog eingeben 
muß. 

Faktum Eine Beziehung zwischen 
Objekten. In spielt(hans,fussball) 
zum Beispiel ist „spielt“ der Name 
der Beziehung und hans und fuß- 
ball sind Objekte, 
fail Ein Teilziel, das nicht erreicht 
werden kann. 

freie Variable Variable, die momen¬ 
tan auf keinen bestimmten Wert 
festgelegt ist. 

goal Die Menge aller Teilziele, die 
erfüllt werden sollen. 
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integer Eine Ganzzahl im Bereich 
von -32768 bis +32767. 
internes Ziel Ziel, das im Programm 
im Zielteil formuliert ist. 

Liste Eine besondere Objektart, 
Ansammlung von Objekten, die in 
eckige Klammern eingeschlossen 
und durch Kommas getrennt sind. 
Operator-Priorität Hierarchie, mit 
der die Reihenfolge festgelegt 
wird, in der Operationen ausge¬ 
führt werden. 

Parameter Sammelname für alle 
Objekte und Variable einer Rela¬ 
tion. 

predicate Jedes Faktum und jede 
Regel gehört zu einer Aussage 


(predicate), die den Namen der 
betreffenden Beziehung angibt 
und die Typen der verknüpften Ob¬ 
jekte. 

real Eine Dezimalzahl im Bereich 
von IO -307 bis 10 +308 . 

Rekursion Technik, bei der eine 
Prozedur sich zur eigenen Defini¬ 
tion selbst aufruft. 

Regel Beziehung zwischen einem 
Faktum und mehreren Teilzielen, 
die erfüllt sein müssen. 

Stack Speicherbereich zum Para¬ 
meteraustausch. 

Standard-Predicate Predicate, be¬ 
reits innerhalb des Turbo-Prolog- 
Systems definiert. 


Symbol Ein Name beginnend mit 
einem Kleinbuchstaben. 
Trace-Fenster Bei Turbo-Prolog 
kann man in diesem Fenster zu 
Testzwecken die Programmausfüh¬ 
rung genau verfolgen. 

Variable Ein Name beginnend mit 
einem Großbuchstaben. Die Varia¬ 
ble kann stellvertretend für den 
Wert eines bestimmten Objekts 
stehen. 

Verbundziel Ziel, das aus minde¬ 
stens zwei Teilzielen besteht. 
Ziel-Baum Ein Diagramm der ver¬ 
schiedenen Möglichkeiten bei der 
Bewertung der Teilziele eines Ge¬ 
samtzieles. 


Prolog-Systeme, Literatur und ein Beispiel-Listing 


Prolog-Systeme sind zurZeit nur 
für einige Home- und Mikrocom¬ 
puter erhältlich. Sie weichen in der 
Ausführung sehr stark voneinander 
ab. Am ausgereiftesten ist,,Turbo- 
Prolog“ von der Firma Heimsoeth 
in München. Es läuft auf dem IBM 
PC und allen dazu kompatiblen 
Rechnern. Ein didaktisch gut auf¬ 
gebautes, ausführliches Hand¬ 
buch mit vielen kurzen Prolog-Li- 
stings erleichtert sehr den Zugang 
zu dieser ungewöhnlichen Spra¬ 
che. 

Für den Commodore 64 ist „Pro¬ 
log 64“ von Brainware in Wiesba¬ 
den. Im Sinclair-Computershop in 
München ist Micro-Prolog für den 
Sinclair-Spectrum 48K erhältlich. 
Beide weisen untereinander und 
zum Turbo-Prolog starke Unter¬ 
schiede auf. Es sind beides Inter¬ 
preterversionen, während Turbo- 
Prolog eine Compilerversion ist. 
Der begrenzte Speicherplatz von 
C64 und Spectrum schränkt die 
Möglichkeiten beider Systeme von 
vornherein stark ein. 

Ein Prolog-System mit dem Na¬ 
men „Prolog II“ kommt von Wolf¬ 
gang Kreitmair und Manfred Krifka 
in Dachau. Es ist bereits für den 
Apple Macintosh erhältlich, arbei¬ 
tet mit Fenstertechnik und hat ei¬ 
nen Editor, der sich ähnlich wie der 
Mac-Write-Editor verhält. Es han¬ 
delt sich um keine Compilerver¬ 
sion. Prolog II soll bald auch für 
IBM-PC/-XT/-AT und kompatible 
Rechner erhältlich sein. Innerhalb 
dieses Artikels wurde vorwiegend 
auf „Turbo-Prolog“ aufgebaut. 

Wer sich für das Umfeld der 
Sprache Prolog interessiert, dem 



steht mit Büchern über Künstliche 
Intelligenz und Expertensysteme 
eine bereits jetzt sehr ansehnliche 
und ständig wachsende Auswahl 
an Computerliteratur zur Verfü¬ 
gung. Nur drei davon seien hier 
genannt. „Künstliche Intelligenz in 
BASIC“ von Mike James bei mvg 
baut auf den Voraussetzungen auf, 
die BASIC-Programmierer mitbrin¬ 
gen, und dringt über die Spiel¬ 
theorie in die Materie ein, ohne 
dann wesentliche Aspekte auszu¬ 
lassen. Klare wissenschaftliche 
Sprache, manchmal allzu mathe¬ 
matisch abstrakt, zeichnen das 
Buch „Künstliche Intelligenz und 
Expertensysteme“ von Stuart E. 
Savory im Oldenbourg Verlag aus. 
Es beinhaltet ein eigenes Kapitel 
über Prolog. Zahlreiche Literatur¬ 
nachweise verschaffen einen na¬ 
hezu lückenlosen Überblick über 
alle relevante Literatur. Einen Blick 
in die Zukunft wirft „Die fünfte 
Computergeneration“ von G. L. Si¬ 
mons im Hanser-Verlag. Bücher, 
die sich ausschließlich und aus¬ 
führlich mit Prolog befassen, ohne 


Handbücher einer bestimmten 
Prolog-Version zu sein, sind sehr 
rar. Eines der wenigen ist „Pro¬ 
gramming in Prolog“ (in englischer 
Sprache) von W. F. Clocksin im 
Springer Verlag. Allerdings wirkt es 
im Aufbau auf Lernende nicht sehr 
motivierend. 

Ein vollständiges Listing des 
Spieles „Türme von Hanoi“ soll ei¬ 
nen Einblick geben, wie ein etwas 
größeres Prolog-Programm aufge¬ 
baut ist. Es fällt auf, daß fast jede 
Prozedur rekursiv definiert ist und 
alle durch gegenseitige Aufrufe 
stark verzahnt sind. Die eigentliche 
Bewegung der Scheiben überneh¬ 
men die Prozeduren move_vert 

und move_horizon. In deren 

Rumpf befindet sich auch die Rou¬ 
tine field_attr, sie ist eine Biblio¬ 

theksroutine und ist deshalb im 
Programm nicht definiert. Vertikale 
und horizontale Bewegung sind je¬ 
weils in zwei Prozeduren formuliert, 
entsprechend einer Bewegung 
nach oben oder unten bzw. rechts 
oder links. Wie bei der Warte¬ 
schleife am Anfang des Prozedur¬ 
teils setzen Cuts mit I der rekursiv 
definierten Bewegung ein Ende, 
wenn sich an der Höhe (bzw. seitli¬ 
chen Verschiebung) gar nichts än¬ 
dert. Weitere Aus- und Eingabe- 
Routinen befinden sich am Ende 
der Prozedur hanoi; dort wird der 
Cursor in Ausgangsstellung ge¬ 
bracht, eine Aufforderung auf den 
Bildschirm geschrieben und die 
Tastatur gelesen, nachdem unter 
anderem mit der Bibliotheksrou¬ 
tine makewindow der Bildschirm¬ 
aufbau zu Beginn des Spieles er¬ 
folgte. -br 
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Lernen am praktischen Beispiel: ein typisches Prolog-Listing 


/****************************************************************/ 


/* TOWERS OF HANOI */ 

/* =============== */ 

/* this hanoi is slowed down */ 


/* Call the predicate hanoi with the number of slices, you want.*/ 
/* Example; Hanoi(6). */ 

/****************************************************************/ 
DOMAINS 

TIME, ROW, COL, NUMBER = INTEGER 

PREDICATES 

hanoi( NUMBER ) 

move( NUMBER, NUMBER, ROW, ROW, ROW, COL, COL, COL ) 

inform( NUMBER, NUMBER, ROW, ROW, COL, COL ) 

makepole( NUMBER, NUMBER, COL) 

delayO dd (TIME) 

move_vert(COL,NUMBER,ROW,ROW) 

move_horizon(ROW,NUMBER,COL,COL) 

CLAUSES 

delay dd(100). 
dd(0):-!. 

dd(N):-Nl=N-l,dd(Nl). 

hanoi(N) 

N<=13,!, 

VB=2+6*N,VH=3+N,CV=N, CM=3*N, CH=5*N, 

STCOL=(79-6*N)/2, STROW=(25-VH)/2, 
makewindow(1,7,7,"Hanoi",STROW,STCOL,VH,VB), 
makepole(N,N,CV), 
move(N,N,0,0,0,CV,CM,CH), 

cursor(0,0), writeC'Press any key"),readchar(_). 

hanoi (__):- write ("maximum 13 disc'sön" ). 

move (H, 1, HA, _, HC , CA, CH) :-! , inf orm (H, 1, HA, HC, CA, CH) . 
move(H,N,HA,HB,HC,CA,CB,CC) 

N1=N-1, 

HA1=HA+1, 

move(H,NI,HAI,HC,HB,CA,CC,CB), 
inform(H,N,HA,HC,CA,CC), 

HC1=HC+1, 

move(H,NI,HB,HA,HCl,CB,CA,CC). 

inform( H, N, Hl, H2, CI, C2 ) 

C11=C1-N, C22=C2-N, NN=2*N, 

H11=H-H1, H22=H-H2, 
move_vert(Cll,NN,Hll,1), 
move_horizon(l,NN,Cll,C22), 
move_vert(C22,NN,1,H22). 


makepole(_,0,_):-!. 

makepole(H,N,C):-HH=H-N,inform(H,N,HH,HH,C,C), N1=N-1, makepole(H,NI,C). 


move_vert (__,_,H,H) . 

move__vert (COL, SIZE,H1,H2) :-Hl<H2, ! , /* move up */ 

H11=H1+1, 

field_attr(Hll,COL,SIZE,112), 
f ield__attr (Hl, COL, SIZE, 7) , delay, delay, 
move_vert(COL,SIZE,Hll,H2). 
move_vert(COL,SIZE,Hl,H2):-H1>H2,i, /* move down */ 

H11=H1-1, 

field_attr(Hll,COL,SIZE,112), 
field_attr(Hl,COL,SIZE,7),delay,delay, 
move_vert(COL,SIZE,Hll,H2). 

move_horizon(_,_,H,H):-! . 

moveJhorizon(ROW,SIZE,CI,C2):-Cl<C2,!, /* move right */ 

C11=C1+1, HH=C1+SIZE, _ 

field_attr(ROW,HH,1,112), 
f ield__attr (ROW, CI, 1,7) ,delay, 
move_horizon(ROW,SIZE,Cll,C2). 
move_horizon(ROW,SIZE,Cl,C2):-Cl>C2,!, /* move left */ 

C11=C1-1, HH=C11+SIZE, 
field_attr(ROW,Cll,1,112) , 
field_attr(ROW,HH,1,7),delay, 
move_horizon(ROW,SIZE,Cll,C2). 

goal 
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HARDWARE 


F ür Leute, die CAD nicht mehr 
für ein neues Deospray halten, 
so ziemlich das Höchste: Ein 
Plotter als Ausgabegerät, unüber¬ 
troffen gerade da, wo es auf höch¬ 
ste Präzision ankommt. Aber meist 
auch entsprechend teuer, da Elek¬ 
tronik, aufwendige Mechanik und 
kleinere Serie kräftig zu Buche 
schlagen. 

Dem Traum vom elektronischen 
Zeichenbrett zum Printerpreis 
kommt der Flachbettplotter HPX-84 
von Habersetzer. (Polling) schon 
recht nahe, zumal das Gerät keine 
Vorurteile kennt: Es arbeitet klag¬ 
los mit allen gängigen Rechnern 
zusammen, die über eine Centro- 
nics-Schnittstelle verfügen (Beim 
Commodore 64 verbindet ein Spe¬ 
zialkabel den Userport mit dem 
Plotter). Es wäre also eine für CAD- 



SnOflBllUG 

Plotten statt Printen? Der Flachbett-Plotter PIPX-84 kostet nicht 

mehr als ein guter Nadeldrucker 



Preiswert geplottet: Mit dem HPX-84 und dem Programm PtC 


Verhältnisse ungewöhnlich preis¬ 
werte Konfiguration denkbar. Der 
HPX-84 selbst kostet als Fertig-Ge- 
rät mit einer Auflösung von 0,1 mm 
knapp 1400 Mark (0,05 mm Auflö¬ 
sung: 1500 Mark, 0,025 mm Auflö¬ 
sung 1600 Mark). Wer keine Scheu 
vor dem Zusammenbau der Präzi¬ 
sionsmechanik und rund acht 
Stunden Zeit hat, kann jedes Mo¬ 
dell als Bausatz erwerben und da¬ 
mit jeweils 200 Mark sparen. 

Der Plotter bietet eine Arbeitsflä¬ 
che von 400 x 290 mm, also etwa 
soviel, wie ein DIN A3-Blatt Platz 
läßt — zwischen den beiden Ma¬ 
gnetstreifen, die das Blatt auf der 
Fläche fixieren. Den Vorschub auf 
der X- und Y-Achse übernehmen 
zwei unipolare Zweiphasen- 
Schrittmotore, die Kraftübertra¬ 
gung zwischen Motor und Mecha¬ 
nik vermittelt eine Stahlseil-Kon¬ 
struktion. Unter der Alu-Abdek- 
kung verbirgt sich neben Netzteil 
und X-Achsen-Schrittmotor die 
Elektronik, die für die über eine Z 
80A-CPU verfügt und die gesamte 
Mechanik steuert, etwa Beschleu¬ 
nigen und Abbremsen der Motore, 
das Erzeugen von Kreisen und 
Rechtecken oder die Randüberwa¬ 


chung. Diverse Stifthalterungen 
gestatten den Einsatz von ver¬ 
schiedensten Faserschreibern 
oder Tuschezeichnern. Einfarbig 
bleibt die Grafik in jedem Fall. Das 
Design des Plotters wirkt alles an¬ 
dere als preisverdächtig, dafür 
aber außerordentlich solide und 
vertrauenserweckend. 

Der Plotter reagiert auf die 
ASCII-Codes, die ervom Computer 
via Centronics-Schnittstelle emp¬ 
fängt. Sein Zeichenstift bringt also 
beispielsweise von BASIC aus mit 
einem PRINT-Befehl den ge¬ 
wünschten Strich aufs Papier. Ein 
extrem umständliches Vorgehen — 
wie schon ein Blick in das magere 
Handbuch zeigt. Im Normalfall 
wird man zu einem ausgewachse¬ 


nen CAD-Programm greifen. Für 
die meisten Anwender dürfte das 
Programm ..Mica“ von E & C (Er¬ 
langen) interessant sein, das wir in 
HC 7/86 besprochen haben (An¬ 
passungen an Apple II, Schneider 
CPC und Joyce, IBM und Kompati¬ 
ble, Commodore 128, Atari ST). Für 
höhere Ansprüche an IBM & CO 
gibt es PIC (Pictures by PC), aller¬ 
dings auch zum zehnfachen Preis. 

Im praktischen Einsatz zeigte 
sich der HPX-84 sehr bedächtig, 
aber auch präzise: Er produzierte 
stumm stufenlose Kreise oder Dia¬ 
gonalen und arbeitete mit erstaun¬ 
licher Wiederholgenauigkeit (bes¬ 
ser als vom Hersteller angekün¬ 
digt) sowie ohne Ausfallserschei¬ 
nungen. -hs 
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Förster, Hans-Peter 

Der Heimcomputer als 
Btx-Terminal 

Wie man Btx-Informationen 
mit dem HC speichert und 
weiterverarbeitet 
196 Seiten, zahlr. Abb., 

30,- DM 

ISBN 3-8023-0850-6 
Bradbury, A.J. 

Das Abenteuer-Programmier- 
buch für den Commodore 64 

Erst programmieren — dann 
spielen 

196 Seiten, 18 Abb.,30,- DM 
ISBN 3-8023-0809-3 

Wittwehr, Clemens 

Spiel und Aktion mit 
Commodore-Logo 

Mit der Schildkröte ins Land 
der Abenteuer 

160 Seiten, 42 Abb., 28,- DM 
ISBN 3-8023-0851-4 

Sinclair, lan 

Mach mehr aus Deinem 
Commodore 64 

Einführung in die Maschinen¬ 
sprache 

180 Seiten, 69 Abb., 30,- DM 
ISBN 3-8023-0808-5 

Kretschmer, Bernd 

Multiplan auf dem 
Commodore 64 

Eine systematische 
Einführung 

176 Seiten, 61 Abb., 28,- DM 
ISBN 3-8023-0799-2 

Rügheimer, Hannes 
Spanik, Christian 
Mein zweites 
Commodore-64-Buch 
Das Buch das nach dem Hand¬ 
buch kommt 

280 Seiten, 23 Abb., 38,- DM 
ISBN 3-8023-0808-5 

Honerkamp, Matthias 
Jetter, Martin 
Fliegen mit dem Mikro 
Das Flugsimulationsprogramm 
“Flight Simulator II" für Apple 
II, IBM PC und Commodore 64 
184 Seiten, 59 Abb., 38,- DM 
ISBN 3-8023-0630-9 
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Grafik mit dem 
Home-Computer 


Rüdeger Baumann ^ A'l 

*;** 

5 

A * 

HX 

£ 


Start mit 
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Dietrich Senftleben 







iMein Home-Computer 


VOGEL-BUCHVERLAG 

WÜRZBURG 


VOGEL-Computerbücher 
helfen lernen, verstehen, 
anwenden 

Sie erhalten bei Ihrem 
Buch- und Computerfach¬ 
händler kostenlos das neue 
Verzeichnis „VOGEL- 
Computerbücher ’85/86‘‘ 
mit rund 100 aktuellen 
Titeln unserer Reihen 
CHIP WISSEN und HC - 
Mein Home-Computer. 


Baumann, Rüdeger 

Grafik mit dem Home-Computer 

Grundlagen und Anwendungen 
programmiert in BASIC 
328 Seiten, zahlreiche Abbildungen 
Dieses Buch führt alle Interessierten, die 
Grundkenntnisse in BASIC haben, in die 
Prinzipien und Techniken der Grafik- 
Programmierung auf Mikrocomputern 
ein. Die Programme sind auf dem Com¬ 
modore 64 entwickelt und getestet. 

Sie sind leicht auf andere grafikfähige 
Mikrocomputer übertragbar. 

ISBN 3-8023-0769-0 38,— DM 


Senftleben, Dietrich 

Start mit Commodore-Logo 

Das kleine Logo-Einmaleins 
Grafik • Text • Musik 
212 Seiten, 70 Abbildungen 
Willkommen bei Logo, der benutzer¬ 
freundlichen Computersprache für Frei¬ 
zeit und Ausbildung. In dieser Einfüh¬ 
rung wird mit Grafik, Text und Musik 
gespielt, gearbeitet und experimentiert. 
Das Buch verlangt aktive Mitarbeit und 
gibt Hilfen und Anregungen für eigenes 
Forschen. 

ISBN 3-8023-0802-6 30,— DM 
































SOFTWARE 


Nieder mit den 
Tippfehlern, es lebe 
der perfekte Text: 
„Ist Lektor“ bügelt 
Rechtschreib¬ 
pannen aus. Auf 
Atari ST. 



lewo-Versioni 


Funktion 


V 1 Text-Korrektur 
Text-Erfassung 


Synonynkorrektur 


^Statistik 


Korrekturenpfindlichkeit:0 


yhoch 

Mittel 


niedrig 


Textzeichensatz 


International 

VASCII-Deutsch 

ASCII-US 


Seilen 


Hörten 


Anschläge 


Listenausgabe : 

Di. Dr. 


II 

alle Wörter 

ii 

_H_ 

unbekannte Wörter 


Ohne Fehl und Tadel 


N icht jeder Schlag ein Treffer: 
Wer viel schreiben muß — sei 
es mit der Schreibmaschine 
oder dem Computer — haut nur 
allzu oft daneben. Das Ergebnis: 
Lauter kleine Blamagen, großflä¬ 
chig im Text verstreut. 

Dem Textverarbeiter kann gehol¬ 
fen werden, mit einem Korrektur¬ 
programm, das wenigstens die 
Orthographie aufpoliert — um 
Grammatik und Stil muß er sich 
vorerst noch selber kümmern. Der 
,, 1 st Lektor“ von CCD (Walluf), den 
wir in der letzten Ausgabe kurz vor¬ 
stellten, repariert die Recht¬ 
schreibdefekte von Atari ST-Besit- 
zern. 

Der vorliegenden Version fehlte 
zwar noch das Lexikon - es soll in 
der Endfassung etwa 60 000 Wörter 
umfassen - dennoch hinterließ 
die zweite Ausgabe einen guten 
Eindruck, vor allem der höheren 
Geschwindigkeit wegen, mit der 
Texte eingelesen und korrigiert 
werden. Das fehlende Lexikon läßt 
sich in kurzer Zeit durch die Ein¬ 
gabe eigener Texte ersetzen. Das 
Programm lernt schnell und willig. 

Der Korrekturwillige baggert also 
erst mal eine Datei von seinem 
Textprogramm — beispielsweise 
von ,, 1 st Word“ — auf den Lektor 
herüber. Erwartungsgemäß findet 
sich derText (als .DOC) im zustän¬ 


digen File-Verzeichnis — nämlich 
unter ,,Erfassen“ - wieder. Der 
Text läßt sich jetzt erfassen und 
korrigieren. Der Lektor fragt den 
Autor nach allen unbekannten 
Worten - und das sind anfangs 
alle. Immerhin, jeder Wortbestand¬ 
teil, der als „richtig“ akzeptiert 
wird, verschwindet sofort im uner¬ 
gründlichen Formenspeicher des 
Lektors. So schwillt das individu¬ 
elle Lexikon von Erfassung zu Er¬ 
fassung stetig an. 

Nach der Wahl des Wörterbuchs 
(es lassen sich mehrere anlegen) 
vergleicht das Programm den Text 
mit dem eingespeicherten Vokabu¬ 
lar und meldet anschließend die 
Zahl der nicht identifizierbaren Vo¬ 
kabeln. Im linken Fenster erscheint 
der Text (Im Format von neun Zei¬ 
len zu 24 Zeichen), wobei das frag¬ 
liche Wort besonders hervorgeho¬ 
ben ist. Im rechten Fenster bringt 
der Lektor Beschwerden („Wort 
unbekannt“), Fragen („Groß¬ 
schreibung?“) oder Verbesse¬ 
rungsvorschläge an, also eine 
Auswahl an Synonymen, die seiner 
Meinung nach besser passen 
könnten. Korrekturen werden so¬ 
fort auf einer Editierzeile ausge¬ 
führt, der bislang unbekannte 
Wortschatz in das Lexikon abge¬ 
speichert. „Soll ich die neuen 
Wörter in ein Wörterbuch schrei¬ 


ben?“ erkundigt sich der Lektor 
vorher höflich. 

Ein Blick in das verborgene Wör¬ 
terbuch ist jederzeit möglich, wenn 
auch wenig aufschlußreich. Das 
stete Anwachsen registriert ein¬ 
drucksvoller ein Zählwerk am unte¬ 
ren Bildschirmrand, wo auch die 
Menge der Unbekannten, der Syn¬ 
onyme und die aktuelle Uhrzeit (!) 
ersichtlich sind. 

Damit wäre für einen normalen 
Speller Feierabend. Nicht dage¬ 
gen für den „Ist Lektor“. Der legt 
jetzt erst richtig los und bombar¬ 
diert den Autor mit Statistiken so¬ 
wie wahlweise Balken-, Linien¬ 
oder kombinierten Grafiken. Von A 
bis Z erfährt man grafisch und nu¬ 
merisch 

★ den Anteil jedes einzelnen Wor¬ 
tes im Gesamttext (in Prozen¬ 
ten) 

★ dieZusammenfassung derzehn 
größten Werte 

★ die Anzahl der einzelnen Wörter 

★ dieZusammenfassung derzehn 
häufigst gebrauchten Vokabeln 

★ die Häufigkeit der einzelnen An¬ 
fangsbuchstaben 

★ Die Häufigkeit jedes Buchsta¬ 
bens insgesamt 

So bietet das Programm für 150 
Mark zwar zusätzlichen Unterhal¬ 
tungswert, aber auch überflüssi¬ 
gen Ballast. -hs 
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Hitparade 


Computerbücher 


Hettinger, Andreas 

Heinz, Andreas 

Start mit Atari-BASIC 

Grundlegendes, Tips, Tricks 

und tolle Programme 

184 Seiten, 10 Abb., 30,- DM 

ISBN 3-8023-0827-1 


aktiv Computern 


James/Gee/Ewbank 
Das Atari-Spielebuch für 
600 XL/800 XL 

184 Seiten, 21 Abb., 30,- 
ISBN 3-8023-0788-7 


Peschetz, Johann 
Peschetz, Alma J. 

Was der Atari alles kann 
Bd.: 1 Musik, Mathematik, 
Grafik, Hilfsprogramme, 
Künstliche Intelligenz, 
Organisation 

236 Seiten, 52 Abb., 35,- 
ISBN 3-8023-0795-X 
Bd. 2: Zehn Fallstudien 
240 Seiten, 47 Abb., 35,- 
ISBN 3-8023-0796-8 


Alfred Görgens 


Andreas Hettinger 
Wolfgang Krauß 


Czerwinski, Manfred 
Testen Sie Ihr Mikrowissen 

Bd. 1: Hardware 
144 Seiten, 28,- DM 
ISBN 3-8023-0812-3 
Bd. 2: Software 
168 Seiten, 30,— DM 
ISBN 3-8023-0825-5 


[Mein Home-Computer 


Görgens, Alfred 

Was Drucker und Plotter alles 
können 

Praktische Anwendungen mit 
Personal- und Homecomputern 
136 Seiten, 47 Abb., 28,- DM 
ISBN 3-8023-0783-6 


in Home-Computer 


Sacht, Hans-Joachim 
Home-Computer 
kurz und bündig 

Was jeder über Home-Compu 
ter wissen muß 
152 Seiten, 72 Abb.,20,- DM 
ISBN 3-8023-0790-9 


VOGEL-ComputerbUcher 
helfen lernen, verstehen, 
anwenden 


Sie erhalten bei Ihrem 
Buch- und Computerfach¬ 
händler kostenlos das neue 
Verzeichnis „VOGEL- 
Computerbücher ’85/86“ 
mit rund 100 aktuellen 
Titeln unserer Reihen 
CHIP WISSEN und HC - 
Mein Home-Computer. 


Hettinger, Andreas/Krauß, Wolfgang 

Die Atari-Hitparade 

Grafik, Sound und Spiele mit vielen 
Programmbeispielen 
196 Seiten, 39 Abbildungen 
Nach einem erfolgreichen Einstieg mit 
Atari-BASIC hilft Ihnen dieses Buch, die 
speziellen Möglichkeiten Ihres Atari 600 
XL, 800 XL oder 130 XE kennenzulernen. 
Sie können dann mühelos Grafiken, 
Sound und Spiele programmieren. Als 
Fortgeschrittener finden Sie Anregungen 
für eigene Aufgabenstellungen. 

ISBN 3-8023-0855-7 33,— DM 


Görgens, Alfred 
Utilities in BASIC 
für Atari-Computer 

Wie Ihre Programme laufen lernen 
120 Seiten, zahlreiche Listings 
Mit diesem Buch können Sie Ihre Pro¬ 
gramme perfektionieren oder nützliche 
Programmierhilfen für Ihren Atari-Com¬ 
puter finden. Alle hier vorgestellten An¬ 
wendungen stammen aus der Program¬ 
mierpraxis. Sie sind so aufgebaut, daß 
keine Assembler-Module oder Zusatz- 
Programme notwendig sind. 

ISBN 3-8023-0854-9 25,— DM 



















Geschwister 

Wirbelwind 

Die eigentliche Arbeit beim Commodore 
Amiga erledigen drei Chips mit den klang¬ 
vollen Namen Paula, Agnus und Denise ' 


U m den Leser vorneweg ein we¬ 
nig zu verwirren, sei verraten, 
daß die drei Koprozessoren 
Paula, Agnus und Denise eigent¬ 
lich ein Superchip sind, in dem 
fünf Prozessoren untergebracht 
sind. Zur Auflösung des Wirrwarrs: 
Koprozessoren sind bekanntlich 
Prozessoren, die unabhängig vom 
Hauptprozessor der Arbeit nach¬ 
gehen, für die sie speziell entwik- 
kelt sind. 

In der Kooperation zwischen 
CPU und Koprozessor tritt bei den 
meisten Computern das Problem 
auf, daß nur die CPU auf den RAM- 
Speicher zugreifen kann. Reichen 
bei umfangreichen Aufgaben die 
internen Register des Koprozes¬ 
sors nicht aus, muß erdie CPU zum 
Durchschalten ins RAM mißbrau¬ 
chen. 

Weil es aber Bitsalat gibt, wenn 
CPU und Koprozessoren gleichzei¬ 
tig auf den Speicher zugreifen, ist 
der RAM-Speicher mit 14,4 Mega¬ 
hertz doppelt so schnell getaktet 
wie die CPU (7,2 MHz). Nur jeder 
zweite Takt des RAM-Speichers 
wird dabei für die CPU reserviert, 
die anderen werden auf die Kopro¬ 
zessoren verteilt. 


Paula, die Sängerin 


Der Name ,,Paula“ leitet sich ir¬ 
gendwie — auch bei Commodore 
ist das nicht mehr nachzuvollzie¬ 
hen — von ,,Peripheral/Audio“ ab. 
Denn dieser Prozessor kontrolliert 
die Arbeit des Computers mit der 
Peripherie und ist für die Klanger¬ 
zeugung zuständig. Daneben ist 
Paula verantwortlich für das ge¬ 
samte Interrupt-Handling. 


Bei einem Interrupt wird das ge¬ 
rade laufende Programm angehal¬ 
ten, sein momentaner Zustand ge¬ 
sichert und eine spezielle Routine 
gestartet, die diese Unterbrechung 
bearbeitet. Paula verbindet die In¬ 
terrupts der Ein-/Ausgabe-Bau- 
steine, der anderen Koprozessoren 
und des Floppycontrollers und gibt 
sie als entsprechende Signale an 
die Register, in denen die CPU 
nachsieht, was sie bei einer Unter¬ 
brechung tun soll. Da Paula aber 
auch Maus, serielle Schnittstelle, 
Drucker, Floppy, Harddisk und alle 
anderen angeschlossenen Geräte 
verwaltet, werden zum Beispiel In¬ 
terrupts, die der Drucker schickt 
(„Daten gedruckt, bitte weitere 
Daten schicken“) direkt, ohne den 
Hauptprozessor zu behelligen, 
verarbeitet, indem Paula via Agnus 
dem Drucker eigenständig weitere 
Daten aus dem RAM-Speicher be¬ 
reitstellt. Die Ausgabe eines Textes 
beim Amiga auf den Drucker kann 
also erfolgen, während der Benut¬ 
zer gleichzeitig auf dem Computer 
etwas ganz anderes tut. 

Darüber hinaus besitzt der 
Paula-Chip vier Soundkanäle, von 
denen je zwei als Stereokanäle zu¬ 
sammengefaßt werden können. Er 
kann analoge Signale (Schallwel¬ 
len) in digitale Impulse umsetzen 
und umgekehrt. Um eine Melodie 
parallel zu einem anderen Pro¬ 
gramm spielen zu lassen, holt 
Paula mit DMA die zur Musikerzeu¬ 
gung nötigen Daten eigenständig 
aus dem Speicher und gibt sie als 
analoge Wellen auf angeschlos¬ 
sene Lautsprecher aus, indem sie 
die Spannung, die am Lautspre¬ 
cherausgang anliegt, anhand der 
gespeicherten Daten verändert. 

Der Name „Denise“ kommt ir¬ 
gendwie von „Display-Encoder“ 
(Bildkodierer). Sobald der Amiga 


irgendetwas grafisches tun muß, 
kommt Denise (zusammen mit 
Agnus) ins Spiel. Denise besitzt 32 
Farbregister, in denen jeweils die 
Rot-, Grün- und Blauintensität der 
entsprechenden Farbe gespei¬ 
chertwerden kann. Insgesamt sind 
bekanntlich 4096 Farbtöne mög¬ 
lich. An Sprites kann Denise acht 
verschiedene gleichzeitig auf dem 
Bildschirm bewegen, jeden 16 Pi¬ 
xel breit und beliebig hoch. Jeder 
dieser acht Sprites kann — wie 
beim VIC des C64 mehrmals ver¬ 
wendet werden, so daß es nur von 
der Geschicklichkeit des Program¬ 
mierers abhängt, wieviele Sprites 
letztendlich tatsächlich auf dem 
Bildschirm zu sehen sind. Um dem 
Amiga die kommerzielle CAD-Welt 
zu öffnen, in dereine Minimalauflö¬ 
sung von 1024 x 1024 Bildschirm¬ 
punkten verlangt wird, kann De¬ 
nise auch eine größere Grafikflä- 


Denise, die Malerin 


che als den Bildschirm verwalten. 
Dieses sogenannte „Playfield“ 
kann stufenlos hin- und herge- 
scrollt werden, so daß auf dem 
Bildschirm immer nur ein Aus¬ 
schnitt der tatsächlich vorhande¬ 
nen Grafik zu sehen ist. Ein Wun¬ 
derchip ist Denise also nicht, eher 
ein aufgemotzter VIC mit dessen 
bekannt guten Grafikeigenschaf¬ 
ten. 

Von seiner Funktion als Adreß- 
generator kommt irgendwie der 
Name „Agnus“. Agnus beinhaltet 
alle DMA-Kanäle, verwaltet sie und 
ermöglicht damit den anderen Ko¬ 
prozessoren den Zugriff auf den 
RAM-Speicher. Agnus wartet so¬ 
lange, bis die CPU den Speicher 
nicht mehr benötigt und schlägt 
dann zu: Solange ein DMA-Zugriff 
über einen der Koprozessoren er¬ 
folgt, signalisiert Agnus der CPU, 
sich vom Speicher fernzuhalten. 
Erst danach gibt er ihn wieder frei, 
was zum Beispiel bei umfangrei¬ 
chen Grafikaufgaben dazuführt, 
daß der gesamte Rechner „in die 
Knie“ geht. Damit wird verhindert, 
daß zwei oder mehrere Prozesso¬ 
ren gleichzeitig auf den RAM-Spei¬ 
cher zugreifen, was heilloses 
Chaos verursachen würde. 

Im Agnus-Chip sind zwei weitere 
Prozessoren integriert: Der Blitter 
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Die glorreichen Drei: Paula, Denise und Agnus animieren den Amiga zu Höchstleistungen 


und der Copper. Der Blitter schau¬ 
felt im wesentlichen große Daten¬ 
mengen schnell durch den Spei¬ 
cher. Er ist verantwortlich für das 
fixe Linienziehen und Flächenaus- 
füllen und für die BOB’s (Blitter 
Objects), die so etwas ähnliches 
sind wie sehr große Sprites. Bei 
den BOB’s werden die Bitmaps, 
die ihr Aussehen bestimmen, in 
den Adreßraum des Bildschirm¬ 
speichers hineinkopiert, auf dem 
das BOB zu sehen ist. Gleichzeitig 
wird der alte Inhalt des Bildschirm¬ 
speichers in einen Puffer kopiert. 
Wird das BOB bewegt, wird die 
BOB-Bitmap an die neuen Bild¬ 
schirmadressen und der Pufferin¬ 
halt an seine alte Position zurück¬ 
kopiert. Das ist wichtig bei den 
Fensterbewegungen und den ver¬ 
schiedenen überlappenden virtu¬ 
ellen Bildschirmen, die der Amiga 
besitzt. Bei dem Schließen eines 
Fensters muß das dahinterlie¬ 
gende nicht mehr neu aufgebaut 
werden, sondern lediglich vom 
Blitter der Inhalt des Puffers, in 
dem das Aussehen des verdeckten 


Teils des Fensters liegt, an die alte 
Stelle des Bildschirms zurückko¬ 
piert werden, was natürlich we¬ 
sentlich schneller geht. BOB's sind 
damit als grafische Elemente we¬ 
sentlich vielseitiger als Sprites, die 
ganze Kopiererei im Speicher ko- 


Agnus, der 
Verwaltungschef 


stet aber mehr Rechenzeit, als nur 
wenige Spritepixel vor dem (unver¬ 
ändert bleibenden) Hintergrund zu 
bewegen, so daß Sprites als be¬ 
wegliche Grafik wesentlich sinnvol¬ 
ler weil schneller sind. 

Der Copper (von: Co-Prozessor) 
schließlich ist eng an den Elektro¬ 
nenstrahl gekoppelt, mit dem der 
Monitor sein Bild aufbaut. Dieser 
Prozessor hat die Fähigkeit, zu er¬ 
kennen, in welcher Zeile und 
Spalte des Bildschirms der Katho¬ 
denstrahl gerade ist. Bei entspre¬ 
chender Programmierung ist es 


dem Copper möglich, sobald ein 
bestimmter Punkt erreicht ist, die 
Register anderer Chips zu verän¬ 
dern. Was unter Umgehung des 
Hold-and-Modify-Modus dazu ver¬ 
wendet werden kann, sämtliche 
4096 Farben auf dem Bildschirm 
darzustellen, indem der Copper 
einfach in den Farbregistern der 
anderen Chips herumpfuscht. 
Auch wenn der Benutzer mit seiner 
Maus einen virtuellen Bildschirm 
herunterzieht, um nachzusehen, 
was seine anderen Programme ge¬ 
rade machen, sorgt der Copper 
dafür, daß jedes Programm weiß, 
wo der Bildschirm anfängt, auf den 
es malen darf. Ausgefuchste Hard¬ 
ware-Bastler, die nun Blut geleckt 
haben und in ihren selbstgebauten 
Rechner den einen oder anderen 
dieser Superchips einbauen wol¬ 
len, müssen enttäuscht werden: Im 
Gegensatz zum Motorola 68000, 
dem Hauptprozessor des Amiga, 
sind Agnus, Denise und Paula 
„Custom-Chips“, die in keinem La¬ 
den und bei keinem Dealer einzeln 
zu kaufen sind. Joachim Graf 
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REPORT 



Blick über 
den Kanal 


Eine Reise nach London lohnt sich immer 
noch. Die Amstrad-Consumer-Show gab 
Aufschluß über künftige Entwicklungen nicht 
nur bei Schneider-Computern. 


N ichts zu sehen und nichts zu 
hören gab es über den IBM- 
kompatiblen PC von Am- 
strad, am besten sollte man also 
auch nicht drüber sprechen. Wäh¬ 
rend hierzulande die Gerüchtekü¬ 
che überbrodelt (neuester Stand: 
Vorstellung eines IBM-kompati- 
blen Schneider-PC auf der Orgatec 
in Köln im Herbst), gab sich Mike 
Mordecai, Software Sales Manager 
von Amstrad, bedeckt. Gute Tradi¬ 
tion von Amstrad sei es, daß nichts 
nach außen dringt, bevor ein Pro¬ 
dukt perfekt ist. 

Die gleiche Seriosität legte er je¬ 
doch nicht an den Tag, als es um 
den kürzlich von Sinclair übernom¬ 
menen Home-Computer-Bereich 
ging. Ein neuer Spectrum mit 128 
KByte RAM, wie der Spectrum 
plus, jedoch mit eingebautem Kas¬ 
settenrecorder und eingebautem 


Joystick, sei für den Herbst denk¬ 
bar. Schneider hatte bereits vor 
diesen Plänen den Schritt von 
Amstrad (Übernahme von Sinclair) 
nicht mitgemacht. Daß am neuen 
Spectrum was dran sein könnte, 
zeigt die Auskunft von Jürgen 
Schumpich, ehemaliger deutscher 
Generalimporteur von Sinclair- 
Produkten, daß er mit Amstrad be¬ 
reits Verhandlungen aufgenom¬ 
men habe. 

In einer Hinsicht ist die Bundes¬ 
republik Deutschland sicherlich 
noch Entwicklungsland: bei der 
Datenfernübertragung. Dabei sind 
nicht nur die Vereinigten Staaten 
als Vorbild zu nennen, auch unsere 
Nachbarländer sind uns deutlich 
voraus. Insbesondere Frankreich: 
weit über 1,5 Millionen Bürger sind 
dort an das Teletel-Netz ange¬ 
schlossen (vergleichbar mit Btx). 


Die Amstrad-Show in London 
zeigte, daß auch in Großbritannien 
sich wesentlich mehr tut, wenn es 
gilt, an einer Zukunft zu bauen, in 
der zum Beispiel Datenbankbenut¬ 
zung und Kommunikation über 
Mailboxen zu den Selbstverständ¬ 
lichkeiten des Alltags gehören. 

Die Voraussetzungen dazu sind 
allerdings nach der Privatisierung 
von British Telecom gänzlich an¬ 
ders als in Frankreich oder der 
Bundesrepublik Deutschland. 
Zwei Systeme, micronet 800 und 
Microlink, haben sich auf der Basis 
von Prestel etabliert und bauen 
ihre Leistungen ständig aus. Ge¬ 
nannt seien nur: Tele-Shopping, 
Sonderangebote in der näheren 
Umgebung, Kleinanzeigen, Inter¬ 
views (die Fragen können alle Sy¬ 
stem-Teilnehmer stellen), Kum¬ 
merkasten, Überspielen von Pro¬ 
grammen auf eigene Datenträger, 
Strategiespiele mit Hunderten von 
Mitspielern. 

Seit Beginn des jetzt über ein¬ 
jährigen Bestehens von Microlink 
nutzen auch deutsche Teilnehmer 
die Möglichkeiten des Systems. 
Die Kosten für Microlink: Beitritts¬ 
gebühr fünf Pfund, monatliche 
Grundgebühr drei Pfund, Telex¬ 
möglichkeit einmalig zehn Pfund 
und zum Beispiel elf Pennies für 
100 Zeichen innerhalb Europas 
oder 2,75 Pfund für 400 Zeichen zu 
Schiffen auf See. Microlink wird 
von Database Publications in Ha- 
zel Grove betrieben. Um den Markt 
richtig erschließen zu können, 
bringt Database Publications die 
DFÜ-Zeitschrift ,.Telelink“ heraus. 
Eigentlich sollte es nur eine Frage 
von kürzester Zeit sein, bis man 
auch in der Bundesrepublik 
Deutschland mit einer DFÜ-Zeit¬ 
schrift einer sich abzeichnenden 
Entwicklung Rechnung trägt. 

Am Stand von Northern Compu¬ 
ters aus Frodsham war eine Fest¬ 
platte für den Amstrad mit einer 
Kapazität von 20 Megabyte zu se¬ 
hen. Das entspricht ungefähr dem 
Hundertfachen von dem, was man 
auf einer Diskette unterbringen 
kann. Besonders interessant ist 
die Festplatte, wenn mit einem 
Netzwerk von der gleichen Firma 
bis zu 100 Amstrad-Computer auf 
die gleichen Programme zugreifen 
können, dk’tronics aus Great Yar- 
mouth hatte sich bisher stark für 
Sinclair engagiert und bietet jetzt 
für Amstrad zahlreiche Erweiterun¬ 
gen an: eine 64K-Speichererweite- 
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rung, eine 256K-Speichererweite- 
rung, eine Speichererweiterung, 
die 256K als RAM-Disk zur Verfü¬ 
gung stellt, einen Sprach-Synthe- 
sizer und ein Grafikpaket. Alle fünf 
können als Steckmodule gleichzei¬ 
tig benutzt werden. 

Ein Midi-System von EMR in 
Wickford, das schon für BBC, 
Commodore und Spectrum ange- 
boten worden war, steht jetzt auch 
für den Amstrad zur Verfügung. 
Dem Preis von 80 englischen Pfund 
für das Midi-Interface muß man 
den Preis für die Grund-Software 
hinzurechnen, ohne die man nicht 
vernünftig arbeiten kann. Das Sy¬ 
stem bietet unter anderem acht 
Stimmen polyphon, 16 Midi-Ka¬ 
näle, neun Oktaven und eine Kapa¬ 
zität von bis zu 8000 Noten. Soft¬ 
ware-Hilfen zum Komponieren, Er- 



DFÜs Für Modem-Benutzer bietet 
Großbritannien einiges 



Erweiterungen: Von RAM-Disk 
bis Sprachsynthesizer 



Harddisk: Die hundertfache 
Kapazität einer Diskette 



Midi: An Musikalität steht Am¬ 
strad anderen nicht mehr nach 


zeugen neuer Klänge, Schreiben 
von Partituren, eine Datenbank mit 
einer Auswahl von Klängen, grafi¬ 
sche Interpretation von Musik wer¬ 
den das Midi-System bald abrun¬ 
den. 

Für Schneider-Benutzer, die in¬ 
nerhalb der Rechner-Familie von 
einer Kassettenversion auf eine 
Diskettenversion umgestiegen 
sind, leisten Transfer-Programme 
einen nützlichen Dienst. Siren 
Software in Manchester bietet ein 
solches an (acht Pfund auf Kas¬ 
sette, elf Pfund auf Diskette), ge¬ 
steht aber ein, daß die Übertra¬ 
gung nur bei 80 Prozent aller 
Programme erfolgreich ist. Eine 
Hardware-Lösung für dieses Pro¬ 
blem kommt von Mirage in Brain- 
tree. Auf Knopfdruck an einem 
Steckmodul soll jedes Programm 
automatisch übertragen werden 
können, und zwar nicht nur von 
Kassette auf Diskette, sondern 
auch umgekehrt. 

Zusammen mit einer Maus bietet 
Advanced Memory Systems Pro¬ 
gramme an, die eine Benutzer¬ 
oberfläche schaffen, die stark an 
Apple Macintosh, Atari ST oder 
Amiga erinnert. Es können Fenster 
benutzt und in eigenen Program¬ 
men sinnvoll eingesetzt werden, 
Icons sind installiert oder können 
selbst entworfen werden. Ein soli¬ 
des Grafiktablett kommt von Graf¬ 
sales in Watford. Die verbesserte 
Version ist geeignet für Heim- und 
Geschäftsanwendungen. Das Ein¬ 
satzgebiet könnte jedoch vor allem 
die Erzeugung von Spiele-Grafik 
und die Weiterbildung sein. 


Kräftige Unterstützung fand auf 
der Amstrad-Show der Joyce (in 
Großbritannien heißt er PCW8256 
bzw. 8512). In Vorstellung und Be¬ 
ratung gab man sich ganz profes¬ 
sionell. In einem ständig überfüll¬ 
ten eigenen Raum wurde über 
Projektionsschirm in die Software 
für den Joyce eingeführt. Eintages¬ 
kurse für die Logoscript-Textverar- 
beitung auf dem Joyce werden in 
verschiedenen Städten Großbri¬ 
tanniens abgehalten. Wer von dem 
Textverarbeitungssystem Tasword 
auch auf dem Joyce nicht lassen 
möchte, weil er es von anderen 
Computern her gewohnt ist, kann 
für 25 Pfund Tasword 8000 kaufen. 

Eine ganze Reihe von professio¬ 
neller Software für den Joyce wird 
von den Firmen Caxton Software in 
London, Saxon Computing in Le- 
confield, Saga Populär Software in 
Newcastle, Gemini in Exmouth, 
Compsoft, Cavalier Software, Pos 
Supplies und Sifan Marketing (alle 
in London) angeboten. Die Palette 
reicht von Kalkulation, Dateiver¬ 
waltung über Sprachen, Kurse, bis 
zu DFÜ-Programmen. 

Bei der Lern-Software tut sich 
nicht allzuviel. Einige Buchstaben- 
und Zahlenprogramme für Schul¬ 
anfänger sowie Mathematik- und 
Fremdsprachenprogramme neh¬ 
men nicht den großen Anteil am 
gesamten Software-Angebot ein, 
den man der Lern-Software noch 
vor kurzem prophezeit hat. 

Eingefleischte Spiele-Freaks 
sind auch auf dieser Amstrad- 
Show wieder gut bedient worden. 
Für einen eher Außenstehenden 
fällt höchstens auf, daß das Faible 
der Engländer für alle Ballspiele 
auf sattem grünen Rasen mit Fuß¬ 
ball, Tennis, Cricket, Golf und Polo 
auch auf dem Bildschirm zum eher 
matten Ausdruck kommt. Brutale 
Kämpfe, Flugzeug gegen Flugzeug 
in der Luft und Mann gegen Mann 
auf der Erde (vorwiegend mit ost¬ 
asiatischem Einschlag) scheinen 
nach wie vor angesagt zu sein. Zu¬ 
ständig für den Spielebereich füh¬ 
len sich vor allem Mirrorsoft in Bri¬ 
stol, der Home-Computer-Club in 
Swindon und Audiogenic Software 
in Reading. 

Mit Literatur ist der Amstrad in 
Großbritannien reichlich versorgt. 
In den Büchern wird mehr und 
mehr fundiertes Wissen über Pro¬ 
grammiersprachen und Betriebs¬ 
systeme (insbesondere CP/M plus) 
vermittelt. -br 
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Farbdrucker 

Okimate 20 ■■■■■■■■■ 




D er Okimate-Farbdrucker ist 
zwar der billigste Drucker in 
unserer Gegenüberstellung, 
gehört jedoch von seinen Lei¬ 
stungsdaten her mit zu den Be¬ 
sten. Im Gegensatz zu seinen 
Druckerkollegen arbeitet der Oki¬ 
mate mit einem Thermofarbband 
(farbig oder schwarzweiß) und er¬ 
reicht damit leuchtende und kon¬ 
trastreiche Farbdrucke in bis zu 14 
Farben. Entsprechend angenehm 
ist sein Arbeitsgeräusch: Außer 
dem leisen Surren der beiden 


Elektromotoren für den Druckkopf- 
und Walzenantrieb ist nichts zu 
hören. 

Und auch an Universalität kann 
es der kleine Drucker durchaus mit 
seinen professionelleren Kollegen 
aufnehmen. Dazu bietet Okidata 
für die bekanntesten Computermo¬ 
delle verschiedene Schnittstellen- 
module (V24, Centronics, C64-IEC) 
an, welche sich leicht in eine ent¬ 
sprechende Öffnung an der Seite 
des Okimate einstecken lassen. 
Der große Vorteil dieser genialen 
Idee ist folgender: Man erhält nicht 
nur einen auf den jeweiligen Rech¬ 
ner optimal angepaßten Drucker, 
sondern kann ihn bei einem späte¬ 
ren Systemwechsel leicht und 
preisgünstig an seinen neuen 
Computer anpassen. Doch das ist 
immer noch nicht alles: Okidata 
hat sich für Commodore-Besitzer 
einen besonderen Service einfal¬ 
len lassen. Für den C64 ist ein spe¬ 
zielles Print-Set erhältlich, welches 


neben umfangreichem Zubehör 
(Farbbänder, Thermopapier usw.) 
eine randvoll gepackte Diskette mit 
phantastischen Demobildern und 
guten Ausdruckprogrammen für 
alle gängigen Malprogramme 
(Doodle, Paint Magic, Koala Pain- 
ter usw.) enthält. 


VOR- UND NACHTEILE 


+ günstiger Preis 
+ gutes Begleitmaterial 
+ hervorragende Farbgrafikfä¬ 
higkeiten 

+ Schnittstellenmodule 
+ leichter und sauberer Farb¬ 
bandwechsel 

- ziemlich teure Farbbänder 

- schwieriger Einzelblattein¬ 
zug 

- etwas schwaches Netzteil 
(wird bei längerem Betrieb 
ziemlich heiß) 



J ahrelange Erfahrung in der Ent¬ 
wicklung und Produktion von 
Druckern hat sich in diesem 
Gerät niedergeschlagen und 
macht es gleichermaßen für den 
anspruchsvollen Büro- wie dem 
ambitionierten Hobbyeinsatz zum 
idealen Drucker. Ein Blick ins In¬ 
nere zeigt einen stabilen Druck¬ 
kopf mit wuchtigem Kühlkörper 
(und aufliegender Farbbandkas¬ 
sette) für den harten Dauereinsatz. 
Der anfällige Keilriemen zum 


Epson EX-800 


Transport des Druckkopfes wurde 
gegen ein stabiles Stahlseil ausge¬ 
tauscht. Auf der Rückseite befindet 
sich neben den Schnittstellen¬ 
buchsen (Centronics, V24 optio¬ 
nal) und den frei zugänglichen 
DIP-Schaltern ein großzügig be¬ 
messener Kühlkörper für die Steu¬ 
erelektronik. 

Bereits vom FX-85 ist die Aus¬ 
wahl der Druckmodi über das Ta¬ 
stenfeld bekannt. Es stehen jetzt 
insgesamt acht beleuchtete Aus¬ 
wahltasten zur Verfügung, die das 
schnelle Umschalten der Schriftar¬ 
ten und Optionen zum reinen Ver¬ 
gnügen machen. 

Natürlich ist der EX-800 voll 
kompatibel zu seinen beiden le¬ 
gendären Vorgängern FX-80 und 
JX-80 und ermöglicht neben NLO- 
Druck auch die IBM-Emulation. 

Bei soviel Sonne muß es 
zwangsläufig auch etwas Schatten 
geben: Mal davon abgesehen, daß 


sich im Hinblick auf die mangelnde 
Farbintensität des JX-80 nicht viel 
geändert hat, ist der Lärmpegel 
während des Drückens nur vom 
Nebenzimmer einigermaßen er¬ 
träglich (Kreissägen-Syndrom!). 
Trotzdem bleibt der EX-800 sehr 
empfehlenswert. 


VOR- UND NACHTEILE 


+ gutes Preis-Leistungs-Ver- 
hältnis 

+ stabile Konstruktion 

+ komfortable Bedienung über 
Tastenfeld 

+ auf Wunsch IBM-Emulation 

- schwache Farbdruck-Inten¬ 
sität 

- mäßige Farbband-Lebens¬ 
dauer (30°/o der Lebens¬ 
dauer des einfarbigen Farb¬ 
bandes) 
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im Vergleich 



M it seinem neuen Modell 5520 
stellt Juki einen Farbdrucker 
für den Hobby- und Bürobe¬ 
reich vor. Im Gegensatz zum Oki- 
mate arbeitet der Juki-Drucker mit 
einem mehrfarbigen Textilband. 
Entsprechend lauter ist auch der 
Druckvorgang. Wirklich vorbildlich 
ist das Handbuch gelungen, was 
neben der Beschreibung der Druk- 
kerbedienung ebenfalls hilfreiche 
Tips für eine Vielzahl von Compu¬ 
tern liefert. Oberstes Gebot bei den 
Juki-Technikern war offensichtlich 


Juki 5520 M 

die Einhaltung der nahezu voll¬ 
ständigen Kompatibilität zum Ep- 
son-Standard (FX-80, JX-80). Nicht 
nur die Escape-Sequenzen zur 
Steuerung der Druckerfähigkeiten, 
sondern auch die Anordnung der 
DIP-Schalter sind identisch zum 
großen Original. 

Ebenfalls sind die gängigen 
Standardschnittstellen (Centro¬ 
nics, V24 als Option) erhältlich. 
Leider gibt es für den Commodore 
64 kein eigenes Modul, doch kann 
man sich hier an dem großen An¬ 
gebot Epson-kompatibler Schnitt¬ 
stellen (wie Görlitz, Wiesemann 
usw.) bedienen. Ebenfalls erwäh¬ 
nenswert ist, daß der Juki-Drucker 
per DIP-Schalter auch mit IBM- 
Druckern kompatibel wird. Damit 
mausert sich dieses Gerät zum AII- 
round-Talent. Und wer sich einen 
der vielen billigen IBM-Kompati- 
blen auf seinen Arbeitstisch stellen 
will, ist mit dem Juki sicherlich gut 
beraten. 


Wer anfangs vielleicht aus finan¬ 
ziellen Gründen auf die Farbdrucke 
aus dem Juki 5520 verzichten muß, 
sollte einmal den kleineren Bruder 
5510 anschauen. Er ist in der 
Grundausstattung als Schwarzweiß- 
Drucker erhältlich, läßt sich später 
auf Farbe und volle Epson/IBM- 
Verträglichkeit Umrüsten. 


VOR- UND NACHTEILE 


+ volle Epson/IBM-Kompatibi- 
lität 

+ Nachrüstung des Juki 5510 
möglich 

+ CentronicsA/24-Schnittstelle 
vorhanden 

+ gute Dokumentation mit vie¬ 
len Hilfestellungen 

- langsamer NLQ-Druck 

— Farbdruck-Qualität stark ab¬ 
hängig vom Alter des Farb¬ 
bandes 



F ür den hauptsächlichen Ein¬ 
satz in Büros ist der Comko 
Farbmatrixdrucker gedacht. 
Entsprechend solide ist seine Me¬ 
chanik ausgefallen, die selbst die 
des EX-800 in den Schatten stellt 
und mit über 20 Kilogramm Ge¬ 
wicht kaum für häufigen Transport 
geeignet ist. Zwei starke Ventilato¬ 
ren sorgen für Kühlung und schal¬ 
ten sich in den Druckpausen ei¬ 
genständig ab. Auffallend ist das 
Bedienungsfeld mit zwölf Funk- 


Comko Farbdrucker 


tionstasten, welches wie beim EX- 
800 die Auswahl von Zeichensätzen 
und Druckfunktionen ermöglicht. 
Die gerade ausgewählte Funktion 
wird dabei über eine rote Digital¬ 
anzeige gemeldet. 

Auch Anschlußprobleme dürften 
der Vergangenheit angehören, da 
der Drucker serienmäßig mit Cen¬ 
tronics- und V24-Schnittstelle aus¬ 
geliefert wird. Typisch für einen Bü¬ 
rodrucker dieser Leistungsklasse 
ist der große Vorrat an auswählba¬ 
ren Zeichensätzen, welcher sich 
durch steckbare ROM-Module er¬ 
weitern läßt. Wem das noch nicht 
reichen sollte, der kann den einge¬ 
bauten Datenpuffer als Speicher 
für selbsterstellte Zeichensätze be¬ 
nutzen. So etwas bietet zwar auch 
der EX-800, doch kann man beim 
Comko-Drucker aufgrund seiner 
hervorragenden Druckauflösung 
Hilfsprogramme benutzen, um di¬ 
gitalisierte Zeichensätze aus Buch¬ 


drucker-Vorlagen einzusetzen. Üb¬ 
rigens beträgt die Druckauflösung 
maximal 240 x 480 Punkte pro Zoll 
und erreicht damit Laserdruck- 
Qualität (Standard 300 x 300 
Punkte pro Zoll). Erfreulich leise 
gibt sich das Gerät während des 
Druckvorgangs, was wohl an dem 
mit Schaumstoff ausgepolsterten 
Gehäuse liegen mag. 


VOR- UND NACHTEILE 


+ ausgezeichnete Druckauflö¬ 
sung 

+ kontrastreiche Farbdrucke 
-I- hervorragender Bedie¬ 
nungskomfort 
+ Typenrad-kompatibel 
4- gute Erweiterungsmöglich¬ 
keiten 

— hoher Preis 

- großes Gehäuse 
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David gegen Goliath 

Mitte Juni dieses Jahres wäre in Köln beinahe ein 8-bit-Rechner 
Weltmeister im Computer-Schach geworden und hätte den 
Superrechner Cray Blitz geschlagen 


Das erste lauffähige Schachpro¬ 
gramm entstand Mitte der fünfziger 
Jahre — in der Wüste von New- 
Mexico. In Los Alamos hatten die 
Vereinigten Staaten ein riesiges 
Laboratorium errichtet, um die Ent¬ 
wicklung von Kernwaffen voranzu¬ 
treiben. Zur Berechnung der 
Sprengladungen, die die atomare 
Kettenreaktion zünden sollten, be¬ 
nutzte man einen neuentwickelten 
Rechner, den Maniac I, der in der 
Lage war, über 10 000 Berechnun¬ 
gen pro Sekunde auszuführen. 
Noch wichtiger: er war frei pro¬ 
grammierbar. 

V 
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Der neue Computer, ein röhren¬ 
bestücktes Monstrum, reizte zum 
Experimentieren, und es dauerte 
nicht allzu lange, bis das erste 
Schachprogramm fertig war. Ins¬ 
gesamt fünf der anwesenden Wis¬ 
senschaftler beteiligten sich an 
diesem Projekt. Um die Aufgabe zu 
vereinfachen, beschlossen sie, 
das Spielfeld auf ein 6 x 6 Brett zu 
begrenzen und die beiden Läufer 
sowie zwei Bauern wegzulassen. 
Ansonsten blieben fast alle 
Schachregeln unverändert. 

Das Programm wurde Mitte der 
fünfziger Jahre fertiggestellt und 


spielte insgesamt drei Partien. Die 
erste war gegen sich selbst (Weiß 
gewann), die zweite gegen einen 
starken Spieler, der dem Computer 
eine Dame vorgab. Diese Partie 
dauerte zehn Stunden und endete 
mit einem Sieg für den Schachmei¬ 
ster. Die dritte Partie spielte eine 
junge Dame, die eine Woche zuvor 
die Schachregeln gelernt hatte. 
Sie verlor das Spiel gegen den 
Computer. Es war ein historischer 
Augenblick, denn zum ersten Mal 
in der Geschichte wurde ein 
Mensch im Schachspiel von einer 
Maschine besiegt. 
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Warum wird man 
Schachprogrammierer? 

Seit jenen Anfängen ließ das In¬ 
teresse für die Schachprogram¬ 
mierung keineswegs nach. An den 
verschiedensten Universitäten und 
Rechenzentren bildeten sich Ar¬ 
beitsgruppen, die intelligentere 
Schachalgorithmen und schnel¬ 
lere Suchstrategien ersannen. Es 
gab aber auch verbissene Einzel¬ 
gänger, die Hunderte von Stunden 
vor einem Terminal verbrachten 
und neue Ideen für ein stärkeres 
Programm ausprobierten. Heute 
existieren mehrere Dutzend ernst¬ 
zunehmende Fachgruppen in aller 
Welt, vor allem in den Vereinigten 
Staaten und Großbritannien, aber 
auch in der Bundesrepublik 
Deutschland, Österreich, Holland, 
in den skandinavischen Ländern, 
ja sogar in der UdSSR, Ungarn und 
Rumänien, wo Rechnerzeit gewiß 
nicht leichtfertig vergeben wird. 
Alljährlich werden Computer¬ 
schachkonferenzen und Turniere 
abgehalten, zu denen die Spitzen¬ 
programmierer um den halben 
Erdball reisen. 

Es gibt viele Gründe, weshalb 
die Schachprogrammierung diese 
immense Popularität erlangt hat. 
Einerseits ist die Aufgabe klar defi¬ 
niert, die Regeln des Spiels sind 
vollständig bekannt, und das End¬ 
ziel (das Schachmatt) ist einfach 
zu beschreiben. Zudem ist das 
Problem weder zu einfach (wie 
etwa Dame oder Backgammon, bei 
denen Computer problemlos zur 
Meisterstärke gelangen) noch zu 
kompliziert (wie das japanische 
Brettspiel Go, bei dem sie kaum 
das Niveau eines blutigen Anfän¬ 
gers erreichen können). Hinzu 
kommt, daß der Schachprogram¬ 
mierer die Fortschritte seiner Ar¬ 
beit besonders deutlich erkennen 
und messen kann: Schachpartien 
lassen sich vorzüglich aufzeich¬ 
nen, nachspielen und analysieren. 
Man kann sie nachträglich nach 
Fehlern absuchen, sie mit Kollegen 
besprechen und sich von erfahre¬ 
nen Schachspielern beraten las¬ 
sen. Und die alljährlichen Turniere 
zeigen immer aufs deutlichste, ob 
man im Vergleich zu den Kollegen 
Fortschritte gemacht hat oder 
nicht. ,,Mein Programm ist besser 
als dein Programm“ ist in der 
Schachprogrammierung eine 
klare, nachprüfbare Aussage. 
Schließlich ist Schach ein Kampf- 



Ein Hand Ventilator wurde zur Küh¬ 
lung der 6502-Hardware des Rebel- 
Programmes eingesetzt 
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Demonstrationsbrett: Fachleute 

kommentieren den Spielverlauf 


sport, und es gibt für den ehrgeizi¬ 
gen Programmierer kaum etwas 
aufregenderes (und meist auch 
nervenaufreibenderes), als die 
Partien seines Computers beim 
Turnier zu verfolgen. Die Spiellei¬ 
denschaft der Menschen kommt 
hier voll zur Geltung. 

Computerschach- 

Weltmeisterschaften 


Die erste Computerschach-Welt¬ 
meisterschaft fand 1974 in Stock¬ 
holm statt, mit 13 Teilnehmern aus 
USA, Kanada, England, Öster¬ 
reich, Ungarn und der UdSSR. Das 
russische Programm Kaissa wurde 
mit 3,5 Punkten aus vier Partien er¬ 
ster Weltmeister der Geschichte. 
1977 traf man sich zur zweiten 
Computerschach-WM in Toronto, 
und diesmal siegte das amerikani¬ 
sche Programm Chess 4.5. Auch in 
den Jahren danach beherrschte 
dieses Programm die Szene: Es 
gewann mehrere nationale Com¬ 
puter-Turniere und nahm auch mit 
beachtlichem Erfolg an menschli¬ 
chen Turnieren teil. Die Vorherr¬ 


schaft der Chess-Serie wurde 
durch die Verwendung eines Su¬ 
percomputers (Cyber 176) unter¬ 
mauert. Kein anderer Autor hatte 
einen ähnlich schnellen Rechner. 

Die ■ dritte Weltmeisterschaft 
wurde 1980 in Linz, Österreich, 
ausgetragen. Dort traten zwei Wis¬ 
senschaftler der Bell Laboratories 
mit einer selbstgebauten Schach¬ 
maschine an, die wesentlich klei¬ 
ner — und hundertmal billiger — 
als der Cyber war. Dennoch konnte 
die Spezialkonstruktion, die auf 
den Namen Belle getauft wurde, 
schachspezifische Berechnungen 
weitaus schneller als der Super¬ 
rechner abarbeiten. Es kam zu ei¬ 
nem spannenden Wettkampf, bei 
dem Belle die gesamte Konkurrenz 
abhängte und dritter Computer¬ 
schach-Weltmeister wurde. 

Drei Jahre später trat eine Mann¬ 
schaft aus Mississippi an, um mit 
dem Programm Cray Blitz die Ehre 
der Großrechner zu retten. Robert 
Hyatt, AI Gower und Harry Nelson 
hatten dem schnellsten Computer 
der Welt das Schachspielen beige¬ 
bracht. Der Cray-I XMP kann in ei¬ 
ner einzigen Sekunde nicht weni¬ 
ger als 210 000 000 Rechenopera¬ 
tionen durchführen — weit mehr 
als ein Mathematiker mit Papier 
und Bleistift in einem Menschenle¬ 
ben. Normalerweise bedient die 
Supermaschine tausende von An¬ 
wendern gleichzeitig, aber bei der 
vierten Computerschach-WM 1983 
in New York stand ihre gesamte 
Rechengewalt im Dienste des 
Schachspiels. Das zahlte sich aus: 
Cray Blitz schlug Belle und gewann 
die Weltmeisterschaft. 

Auch bei der WM in Köln war 
man gespannt auf den Zweikampf 
David gegen Goliath. Denn bei der 
letzten Nordamerikanischen Com¬ 
puterschach-Meisterschaft siegte 
nicht wie gewohnt der amtierende 
Weltmeister Cray Blitz, sondern ein 
neues Programm namens Hitech. 
Die meisten Computerschach- 
Freunde hatten noch nie von ihm 
gehört, aber bereits zum Zeitpunkt 
des Turniers war Hitech bei Tur¬ 
nierspielern in den Vereinigten 
Staaten bestens bekannt: In Wett¬ 
kämpfen gegen Menschen hatte er 
hervorragende Erfolge erzielt. 

Die neue Schachmaschine 
wurde an der renommierrten Car- 
negie-Mellon-Universität in Pitts¬ 
burgh entwickelt und stellt in erster 
Linie eine sehr schnelle Schach- 
Hardware dar. Während eine Cray 
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mit ihren 210 Millionen Operatio¬ 
nen es schafft, etwa 30 000 
Schachstellungen pro Sekunde zu 
erzeugen und zu bewerten, bringt 
es Hitech mit seinen 64 speziell für 
das Schachspiel entwickelten 
VLSI-Chips auf atemberaubende 
175 000 Stellungen in der Sekunde. 
Ein Sun-1.6-Mikrocomputer be¬ 
sorgt die Kommunikation mit der 
Maschine und versorgt sie mit kon¬ 
textabhängiger Schachinforma¬ 
tion. Da gerade hier ständig neue, 


bessere Bewertungsalgorithmen 
eingesetzt werden, gibt es Grund 
zu der Annahme, daß Hitech die 
erste Maschine sein könnte, die 
Großmeister-Stärke erreicht. 

In letzter Zeit wurde eine andere 
Entwicklung deutlich: Immer mehr 
Schachprogrammierer steigen auf 
Mikrosysteme um. Das liegt vor al¬ 
lem daran, daß Prozessoren wie 
der 68000 von Motorola heute Lei¬ 
stungen erbringen, die vor weni¬ 
gen Jahren den Großrechnern Vor¬ 


behalten waren. Ein solcher Pro¬ 
zessor verrichtet beispielsweise in 
dem deutschen Schachcomputer 
Mephisto Amsterdam seine Arbeit. 
Dieses käuflich erhältliche Holzge¬ 
rät (es kostet ca. 3000 Mark und 
wird in München von der Firma He- 
gener + Glaser gebaut) siegte 
1985 bei der Mikrocomputer-Welt¬ 
meisterschaft in Amsterdam mit 22 
Punkten aus 24 Partien — ein kaum 
vorstellbares Ergebnis! Für eine 
Plazierung unter den ersten vier 
schien der verbesserte Mephisto 
Cologne, der zudem mit super¬ 
schneller 68020-Hardware lief, alle¬ 
mal gut. 

Mikros auf dem 
Vormarsch 


Keine Titelaspirationen in Köln 
hatten dagegen die kleinen 8-bit- 
Programme, die in den „normalen“ 
Schachcomputern ihre Arbeit ver¬ 
richten. Die kleinsten unter ihnen 
— gerade taschenbuchgroß und 
350 Gramm schwer — kosten ja 
auch wesentlich weniger als eine 
CPU-Minute auf der Cray. Sie sind 
für die Masse der Hobbyspieler ein 
schönes Weihnachtsgeschenk und 
ein geduldiger Schachpartner. 

Ein solches 8-bit-Programm 
heißt Rebel und wurde von dem 
Holländer Ed Schröder für den 
6502 entwickelt. Ursprünglich 
sollte er 1985 in einem Mephisto- 
Schachcomputer eingesetzt wer¬ 
den, aber die Hersteller waren 
noch nicht von seiner Spielstärke 
überzeugt. Schröder ging zurück 
an die Arbeit und bastelte ein hal¬ 
bes Jahr an dem Programm. In 
Köln erschien er mit der neuesten 
Version, die auf einer mit 11 MHz 
getakteten 6502 lief. Die Hardware 


Modernste Kommunikationstechnik 


Bei früheren Weltmeisterschaf¬ 
ten bedienten sich die meisten 
Programmierer noch der guten 
alten Telefonleitung: Sie spra¬ 
chen mit einem Kollegen, der im 
Rechenzentrum saß und den ei¬ 
gentlichen Dialog mit dem Com¬ 
puter führte. Zeitverluste und 
Mißverständnisse waren unver¬ 
meidlich, und die hohen Kosten 
für die Standleitungen machten 
die Veranstaltung zu einer sehr 
kostspieligen Angelegenheit. Für 
die WM in Köln hatte dagegen ein 
führendes Unternehmen für elek¬ 
tronische Datenfernübertragung, 
die Deutsche Mailbox GmbH in 
Hamburg, es tatsächlich fertigge¬ 
bracht, alle extern stationierten 
Großrechner über den weitaus 
preiswerteren Datex-P-Service 
der Bundespost mit dem Austra¬ 
gungssaal in Köln zu verbinden. 
Dabei wurden die anfallenden 
Daten in einem Knotenrechner 
gesammelt und über eine ge¬ 
meinsame (virtuelle) Leitung 
nach USA, Kanada oder England 
geschickt. Berechnet wird bei Da- 


tex-P nur die aktuelle Übertra- 
gungszeit — mitunter Bruchteile 
eines Pfennigs pro Zug. Das alles 
geschah fast ohne Zeitverzöge¬ 
rung, so daß der Bediener eines 
Rechners in Neu-Mexiko fast das 
Gefühl hatte, sein Terminal sei mit 
einem Computer im Nebenzim¬ 
mer verbunden. 

Natürlich verfügte nicht jeder 
Rechner über einen Datex-P- 
kompatiblen Anschluß, und so 
mußte das Kommunikationsgenie 
der Deutschen Mailbox, Horst- 
Günther Lynsche, am Vorabend 
der WM so manch abenteuerliche 
Verbindung stricken. („Wenn Sie 
mit Ihrem System eine Verbin¬ 
dung von Minnesota über Ala¬ 
bama nach Alberta hersteilen 
können, dann klinken wir uns ein¬ 
fach in Kanada in das Netz ein!“) 
Auch eingefleischte Computer¬ 
spezialisten waren von so viel Im¬ 
provisationstalent beeindruckt, 
und am Ende des Turniers muß¬ 
ten sogar die Skeptiker gestehen: 
Es hat alles tadellos geklappt. 
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war nicht besonders stabil und 
mußte mit einem Handventilator 
gekühlt werden. Aber Rebel ge¬ 
wann eine Partie nach der anderen 
— und sorgte beinahe für die 
größte Sensation der Computer¬ 
schachgeschichte. 

Als die letzte Runde in Köln ein¬ 
geläutet wurde, mußte der bis da¬ 
hin souverän führende Hitech die 
erste Niederlage gegen Cray Blitz 
hinnehmen. Am Nebenbrett spielte 
Rebel gegen die Spezialmaschine 
Be-Be, die schon seit Jahren als 
Anwärter auf den Titel gilt. Aber ein 
Blick auf das Brett verriet: Rebel 
stand klar auf Gewinn! Die ge¬ 
samte Halle begann zu rechnen. 
Würde Rebel die Partie für sich ent¬ 
scheiden, wäre er unter den Erst¬ 
plazierten aufgrund der besten 
,,Buchholzwertung“ (ein bei sol¬ 
chen Turnieren eingesetztes Sy¬ 
stem zur Bestimmung der Plazie¬ 
rung bei Punktgleichheit) tatsäch¬ 
lich Weltmeister. Für Rebel-Autor 
Ed Schröder wurde es eine herz¬ 
zerreißende Partie, die schließlich 
doch von Be-Be gewonnen wurde 
(siehe Kasten auf dieser Seite). 

Um ein Haar hätte es also einen 
Weltmeister aller Klassen gege¬ 
ben, den man für einige hundert 
Mark ins Haus holt. Auch so 
konnte sich die Rebel-Mannschaft 
vor Anfragen kaum noch retten: 
Wann kommt das Programm auf 
den Markt, wieviel wird es kosten? 
Bekannt war allerdings nur, daß 
Hegener + Glaser das Programm 
noch in diesem Jahr unter der Be¬ 
zeichnung MM-Ill als Zusatzmodul 
für ihre Mephisto-Schachcomputer 
auf den Markt bringt. Natürlich 
wird es nicht so schnell laufen wie 
in Köln, aber das dürfte die wenig¬ 
sten Schachcomputer-Freunde 


stören: Auch mit 3 oder 5 MHz 
dürfte es zu den stärksten Mikro¬ 
computer-Programmen der Welt 
gehören. 

Den Titel des Weltmeisters be¬ 
hielt zum Schluß Cray Blitz, punkt¬ 
gleich mit Hitech, Be-Be und 
Phoenix, aber mit der besten 
Buchholzwertung. Der verwendete 
Rechner stand in den Forschungs¬ 


labors von Cray Research in Men- 
dota Hights, Minnesota, und be¬ 
saß vier CPU. Das machte 
420 000 000 Operationen pro Se¬ 
kunde und ist gut für 100 000 Stel¬ 
lungsbewertungen in der Se¬ 
kunde. So viel nackte Rechenge¬ 
walt ist bisher noch nie für das 
Schachspiel eingesetzt worden. 

Frederic Friede! 


Die Partie, mit der 
Rebel die Weltmeister¬ 
schaft verspielte 

5. Runde: Rebel gegen Be-Be 

I. d4 Sf6 2.c4 c5 3.d5 e6 4.Sc3 
exd5 5.cxd5 d6 6.e4 g6 7. Lf4 a6 
8.Sf3 Lg4 9.Le2 Db6 10.Dd2 Lg7 

II. 0-0 0-0 12.h3 Lxf3 13.Lxf3 
Sbd7 14.Tad1 Tfeß 15.b3 Se5 
16.Le2 Db4 17.Dc2 Te7 18.Lg3 
Tae819.Tfe1 g5 20.Tf1 Kh8 21.Tc1 
h5? Bisher hat Schwarz die Er¬ 
öffnung recht gut behandelt, 
nach klassischem Muster, wäh¬ 
rend Weiß nur planlos herum¬ 
zog. Doch nun macht er einen 
schwerwiegenden Fehler (bes¬ 
ser war 21 ... h6) und verliert 
damit beinahe die Partie. 

22.f4 gxf4 23.Txf4 Sg6 24.Tf5 
Sxe4 25.Sxe4 Dxe4 26.Dxe4 Txe4 
27.Lxh5 Se7 28.Txf7 Ld4 + 
29.Kh1 Sxd5 30.Txb7 Td8 31.Lf3 
Te3 32.Lh4 Sf6 33.Tf7 Te6 34,Ld5 
Sxd5 35.Lxd8 Sb4 36.a3 Kg8 
37,Tcf1 Sc2 38.Tf8+ Kg7 39.a4 
d5 40.h4 Se3 41.T1f7+ Kg6 
42.Tc7 Sdl 43.Tg8+ Kf5 44.Tf7 + 
Ke4 45.g4 Kd3 46.h5 Tel 4- 
47.Kg2 Se3+ 48.Kg3 Le5 + 
49.Kh4 Thl + 50.Kg5Tg1 51.Kg6 
Txg4+ 52.Lg5 Tb4 53.Lxe3 Kxe3 
54.Te8 Tg4+ 55.Kh7Te4 



a b c d e f g h 


Die Stellung nach dem 55. Zug 

56. Ta7?? Dieser Zug verliert Mil¬ 
lionen! Statt mit 56.Tfe7 Kd4 

57. Txe5 Txe5 58.Txe5 Kxe5 
59.Kg6 d4 60.h6 die Partie für 
sich zu entscheiden (Weiß wan¬ 
delt als erster mit Schach um), 
ging Rebel völlig unnötig auf 
Bauernjagd. Er verschenkte da¬ 
mit die Chance, Weltmeister zu 
werden — und das ganz große 
Geschäft zu machen. 

56 ... d4 57.Txa6 d3 58.Tg6 d2 
59.Tg1 Kf2 60.Teg8Te1 61.T1g2 + 
Ke3 62.Txd2 Kxd2 63.Tc8 Ld4 
64.Tb8 Te6 65.Tb7 Kc2 66. b4 c4 
67.b5 c3 68.Td7 Kd3 69.b6 c2 
70.b7 cID 0:1 







Alle Preise zzgl. 5,- DM Porto & Verpak- 
kung. Versand nur gegen Nachnahme. 
Fordern Sie unseren neuen großen Ge¬ 
samt-Katalog für Atari 800, ST, Commo- 
dore VC-20, C-116, C-16 Plus/4, C-64 
C-128, Amiga, MSX und Schneider. 

HÄNDLERANFRAGEN ERWÜNSCHT! 

PROGRAMMIERER GESUCHT! 
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Was nun, Sir 
Foxworth? 

Die Detektive, 
ratlos auf dem 
Raddampfer: 
Hinter einer der 
vielen Türen 
verbirgt sich 
der Killer und 
legt ein Ruhe- 
päuschen ein 
— vordem 
nächsten Mord. 


Leiche auf Reisen 

Nur einen Passagier läßt das tur¬ 
bulente Geschehen an Bord des 
Raddampfers kalt: Er liegt mau¬ 
setot in seinem Blute und in Ka¬ 
bine 4 der ,,Delta Princess“. Und 
während sich das Schiff weiter 
den Mississippi hinunterschau¬ 
felt, New Orleans entgegen, be¬ 
ginnt die Suche nach dem Mör¬ 
der. Sir Charles Foxworth und 
sein Detektivgehilfe Regis Phelps 
durchstöbern den alten Kahn von 
unten bis oben, vom Maschinen¬ 
raum bis zur Brücke — und alle 
drei Decks dazwischen. Sehr zum 
Leidwesen von Besatzung und 
Passagieren, die anfangs weder 
für drängende Fragen noch für lä¬ 


stige Durchsuchungen viel Ver¬ 
ständnis aufbringen. Immerhin, 
es finden sich Indizien — parfü¬ 
mierte Putzlappen, ein Pistolen¬ 
futteral, ein altes Ticket. . . und 
aus dem Gewirr der Aussagen kri¬ 
stallisieren sich nicht nur die per¬ 
sönlichen Eigenheiten der Rei¬ 
senden und ihre zwischen¬ 
menschlichen Beziehungen im¬ 
mer deutlicher heraus, sondern 
auch ein handfester Tatverdacht. 
Sir Foxworth kann die Handschel¬ 
len zuschnappen lassen (Falls 
ihn der Killer nicht schon vorher 
ins Jenseits befördert hat). 

Mit dem Kriminal-Computer¬ 
spiel ,,Murder on the Mississippi“ 
landete Activision einen doppel¬ 
ten Volltreffer: Die sehr verschie¬ 


den ausgeprägten Charaktere der 
Beteiligten werden aus ihren Dia¬ 
logen und den Kommentaren prä¬ 
zise und originell gezeichnet, 
schon in der englischen Version 
überrascht ein überdurchschnitt¬ 
liches sprachliches Niveau (zwi¬ 
schen Oxford und Slumslang). 

Aufbereitung und Zutaten stim¬ 
men ebenfalls: Das prächtig ani¬ 
mierte Detektivgespann arbeitet 
sich durch ein üppig ausgestatte¬ 
tes Schiff mit 29 Räumen voller 
Überraschungen und Rätsel 
durch, mit dem Joystick gesteuert 
und einem gut sortierten Fragen¬ 
katalog ausgestattet. Textein¬ 
gabe per Tastatur erübrigt sich, 
ebenso die Kenntnis des Engli¬ 
schen — eine deutsche Version 
ist in Sicht. Findigkeit und Kom¬ 
binationsvermögen sind gefragt, 
weniger dagegen Geschicklich¬ 
keit oder Ausdauer: Das Jagdfie¬ 
ber stellt sich von selber ein. 


„Murder on the 
Mississippi" 

Von Activision. Für Com- 
modore 64/128. Diskette 
circa 60 Mark. Eine Deli¬ 
katesse für Krimifans. 




Bombenstimmung 

Ein Drama mit drei Aufzügen und 
jeder Menge Meuchelmörder: In 
,,Mission Elevator“ klappert der 
heldenhafte Hausdetektiv alle 36 
Stockwerke eines Hotels auf der 
Suche nach einer versteckten 
Bombe ab, immer in engem Kon¬ 


takt mit der Unterwelt. Die schießt 
aus allen Rohren (und allen Lifts, 
Zimmern und Korridoren) auf den 
Sprengstoffschnüffler. Der soll in 
der bleihaltigen Atmosphäre 
auch noch diverse Gegenstände 
finden, das Personal bestechen, 
Pokern und die Bar besuchen. 

Im Kugelhagel erweist sich der 
Detektiv als erstaunlich gelenkig: 
Nicht nur die Liftfahrten erinnern 
an Jmpossible Mission“, son¬ 
dern auch die Animation des 
Hauptdarstellers. Das Ganze ist 
überdies recht witzig, detailfreu¬ 
dig und stimmungsvoll in Szene 
gesetzt und ergibt so eine aparte 
Mischung zwischen schneller Ac¬ 
tion und Such/Ratespiel. Sehr er¬ 
freulich: Der Hauptdarsteller darf 


sich knapp tausendmal pro Spiel 
umnieten lassen. Erforderlich 
sind Reaktionsvermögen und 
(geringfügige) Englischkennt¬ 
nisse. 



„Mission Elevator" 

Von Rushware. Für Com- 
modore 64 und Schnei¬ 
der CPC. Kassette circa 
40 Mark und Diskette 
circa 50 bis 60 Mark. Die 
Mafia nimmt den Aufzug. 
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Flattermann im An¬ 
flug 

Jeden Tag derselbe Ärger: Bat- 
man, der Fledermausförmige, 
sucht verzweifelt Stiefel, Gürtel, 
Triebwerk und Schulranzen, um 
heute endlich die Teile für sein 


..Batcraft“ einsammeln zu kön¬ 
nen. Wie üblich sind die Monster 
von Joker & Riddler hinter ihm her 
und zehren an Lebens- und Ner- 
venkraft. Die Suche nach den 
Fahrzeugteilen erstreckt sich 
über 151 Räume, die größtenteils 
mit Gerümpel und Schurken voll¬ 
gestopft sind. 

Dexter läßt grüßen: Die dreidi¬ 
mensionale Darstellung der 
Räumlichkeiten, das verblüffende 
Eigenleben mancher Gegen¬ 
stände und die Animation der 
Darsteller gemahnen stark an die 
Games ,,Get Dexter“ und ,,Fair- 
ligt“, entfernt auch an ,,Spin- 
dizzy“. Nur daß diesmal der Job 
des Helden noch komplizierter 
geraten ist. Dafür sorgen tücki¬ 


sche Brücken und Fragen sowie 
die diversen Möglichkeiten, 
Energie oder Leben aufzutanken 
— oder zu verlieren. Durch¬ 
schnittliche Geschicklichkeit und 
etwas Findigkeit genügen den¬ 
noch für diese haarsträubende 
Jagd über acht Level. 


„Bat Man" 

Von Ocean Software/ 
Rushware. Für Schnei¬ 
der CPC. Kassette circa. 
30 Mark. 

Ein Held läuft heiß. 
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Barhiß durch den 
Friedhof 


Erst gehen sie dem Rittersmann 
an die Wäsche, dann ans Leben: 
Die wüsten Geister, die sich aus 
den Gräbern des noch wüsteren 
Friedhofes erheben, legen nicht 
nur ein beachtliches Tempo an 


die Nacht, sie haben außerdem 
einen harten Schlag am (Astral-) 
Leib. Der Ritter steht nach dem 
Erstkontakt in der Unterwäsche 
da, nach dem zweiten in den Kno¬ 
chen. Er wehrt sich gegen den 
morbiden Strip unter anderem 
mit Feuerkugeln und Wurfschwer¬ 
tern - wenn er nicht gerade über 
Grabsteine oder Grüfte springt, 
Leitern erklettert oder Drachen 
niedermacht. Der Hindernislauf 
führt über vier Level, das Land der 
Elfen und letztlich in ein Schloß, 
wo sich das ganze geisterhafte 
Gesindel nochmal ein letztes 
Stelldichein gibt. 

Ein geradezu klassisches Ac- 
tion- und Ballerspiel, das neben 
gruseliger Stimmungslage auch 


eine hübsche grafische Umset¬ 
zung mitbringt. Die musikalische 
Begleitung des Grusicals kann 
sich ebenfalls hören lassen. 
Durchaus einfach per Joystick zu 
steuern, verlangt das Spiel nach 
einiger Reaktionsschnelligkeit - 
immerhin gibt es nur sechs Leben 
pro Runde zu verlieren. 



„Ghosts'n Goblins" 

Von Elite. Für Schneider 
CPC und Commodore 
64: Kassette circa 34 
Mark, Diskette circa 53 
Mark. 

Schneller Grabsteinsla¬ 
lom 



Liebeslolle Meer¬ 
jungfrau 

Mit der ganzen Fülle ihres wahr¬ 
lich gewaltigen Luxuskörpers wirft 
sich die Meerjungfrau Myrtle in 
die Fluten des Ozeans, auf der 
Jagd nach einem verzweifelt 


flüchtenden Taucher. Der findet 
kurzfristig Schutz unter dem 
Wrack eines versunkenen Damp¬ 
fers, wo er traurig wartet - bis 
ihm der Sauerstoff ausgeht, oder 
die Nymphe sein feuchtes Ver¬ 
steckentdeckt. Eine schauerliche 
Alternative. 

Die Meerjungfrau pflügt derweil 
durch die tückischen Tiefen, wo 
allerlei Gefahren auf sie lauern — 
in Form von Haien, Kraken und 
Seeungeheuern. Ihre schwinden¬ 
den Energievorräte bekämpft sie 
mit dem Inhalt einiger Guinessfla- 
schen, die am Meeresgrund her¬ 
umliegen. Auch sonst gibt es al¬ 
lerlei interessante Objekte zu 
finden. Endlich mal ein Spiel, das 
sich nicht so tierisch ernst nimmt, 


eine echte Erholung zwischen 
Weltraumdramen und Karateprü¬ 
geleien. Die originelle Handlung 
wurde in ebenso witzige Grafik 
umgesetzt. Dazu kommt eine 
wohlgeratene Animation und eine 
vorbildliche Bildschirmauftei¬ 
lung: Der größte Teil der Fläche 
bleibt der Handlung reserviert, 
nicht den Accessoires. 



„Mermaid Mad- 

ness" 

Von Electric Dreams/Ac- 
tivision. Für 64, CPC und 
Spectrum. Kassette 
circa 40 Mark, Diskette 
circa 60 Mark. 

Originelles Labyrinthspiel 
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Wo andere Tools versagen, hilft 

Der letzte 
Hammer 
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Tarnen und Täuschen 

Ein hitverdächtiges Com¬ 
puter-Zubehör hat die 
Firma Wiesemann ent¬ 
wickelt - den ,,Dummy- 
Printer“. Das Ding kostet 
im Gegensatz zu einem 
Drucker, für den minde¬ 
stens 500 Mark zu löhnen 
sind, nur zehn Mark. 
Dennoch leiste es Er¬ 
staunliches, meint der 
Hersteller: „Dieser kleine 
Stecker wird einfach auf 
den Druckerausgang ei¬ 
nes IBM PC oder Kompa¬ 
tiblen gesteckt und simu¬ 
liert einen angeschlosse¬ 
nen Drucker. Jetzt kann 
der Computer nach Her- 


Die Horror-Boxen 

Schreckensmeldung aus 
den USA: In den Mailbo¬ 
xen machen sich Killervi¬ 
ren breit, die sich auf je¬ 
den harmlosen Computer 
stürzen, der mit der ver¬ 
seuchten Box Kontakt 
aufnimmt. Wie das US- 
Magazin „Omni“ (und 
anschließend der „Spie¬ 
gel“) berichtete, verbrei¬ 
ten gemeine Freaks über 
Mailboxen infizierte Pro¬ 
gramme, die nach dem 
Abrufen sämtliche Daten¬ 
bestände im Home-Com- 


zenslust ausdrucken, 
ohne daß dafür unsere 
Wälder abgeholzt werden 
müssen.“ 

Bravo! Der Simulant 
dürfte sich besonders in 
der Textverarbeitung po¬ 
sitiv auswirken, wenn der 
Adressat nicht mehr mit 
dem geprinteten Unfug 
des Verfassers behelligt 
wird. Wir warten jetzt 
sehnlichst auf den 
Dummy-Monitor, die 
Dummy-Floppy und den 
Dummy-Hacker. Der Ef¬ 
fekt: Garantiert nie mehr 
Ärger mit dem Computer. 


puter sowie in der betei¬ 
ligten Floppy gründlich 
ruinieren. Auf dem Moni¬ 
tor taucht kurz vor dem 
endgültigen Datenzerfall 
noch ein hämisches „Arf, 
arf! Gotcha!“ auf — was 
soviel wie „Har, har“ Wir 
haben Dich!“ bedeutet. 


Wenn der Bildschirm 
strahlt 

Kaum zu glauben, was so 
ein Monitor alles auf sei¬ 
nen Betrachter ab¬ 
schießt. Zum Beispiel 


UV- und Röntgenstrahlen 
sowie Mikrostaubpartikel 
(20 000 VBE)! Brrrrrr. Da¬ 
gegen hilft neuerdings 
die dezent getönte 
„Splend-Computer- 
BriIle“ in „Classic“ (Gold) 
oder „Sport“ (Schwarz) 
von der P. Nicola GmbH. 
Sie soll außerdem Ermü¬ 
dung und Konzentra¬ 
tionsabbau mindern. 
Angesichts von Program¬ 
men wie Locoscript, 
Green Beret und Little 
Computer People fordern 
wir jedoch die garantiert 
undurchsichtige Compu¬ 
ter-Brille. Das Design 
und das Gestell sind uns 
schnurz — die Hauptsa¬ 
che, gnädiges Schwarz 
verhüllt das Geschehen 
auf dem Monitor. 


Gegendarstellung 

Tausende von Atari- 
Besitzern erregten 

sich bis an den Rand 
des Herzinfarkts: Hat¬ 
ten wir doch im vor¬ 
letzten Hammer (HC 
Juli 86) gefrevelt, daß 
der 800X1 neben dem 
Amiga popelig wirke. 
Wir behaupten also 
hiermit keineswegs 
das Gegenteil, son¬ 
dern bezeichnen feier¬ 
lich alle IBMs, Com- 
modores, Sinclairs, 
Vaxens, Schneiders 
sowie die Kisten von 
Pentagon, CIA, Verfas¬ 
sungsschutz und Vati¬ 
kan als popelige Com¬ 
puter. Hoffentlich sind 
jetzt alle gleichmäßig 
beleidigt — oder soll¬ 
ten wir noch jemand 
vergessen haben? 


Geburtsanzeige 

Im Peek- und Poke- 
Dschungel des Commo- 
dore 64 existiert auch 
eine Speicherstelle für 
Patrioten: Wer wissen 
will, wo sein C64 gebaut 
wurde, braucht nur die 
Adresse 678 abzufragen: 
Taucht eine 1 auf, so läßt 
dies auf „Made in Ger- 
many“ schließen, eine 0 
dagegen deutet auf die 
Herkunft aus den USA hin 
(Die Betriebssystem-Pro¬ 
grammierer schienen 
demnach an latentem 
Antiamerikanismus zu 
leiden). Daß Taiwan-Im¬ 
porte den Befehl PRINT 
PEEK (678) mit Absturz 
quittieren, ist ein unbe¬ 
stätigtes Gerücht. 

Joachim Graf 

Electronic Killer 

Genau das haben wir uns 
schon immer gedacht, 
und jetzt stand es sogar 
in der Abendzeitung 
(München): „Computer 
ließ Rentnerin .sterben'.“ 
Die Dinger sind also gar 
nicht so harmlos, wie sie 
immer tun. Aber schon in 
der Unterzeile wird klar, 
daß unser elektronischer 
Hausfreund wie üblich 
halbe Arbeit geleistet 
hat: „Frau, (75), kämpft: 

,Ich lebe“'. Der Amateur¬ 
mörder pfuscht in der 
Bundesversicherung für 
Angestellte und hatte die 
höchst lebendige Leiche 
versehentlich (oder ab¬ 
sichtlich?) auf die Liste 
verblichener Rentenemp¬ 
fänger gesetzt. Requies- 
cat in pace. 
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Activision, Hamburg 2. US 

Ariolasoft, Gütersloh 33 

Data Becker, Düsseldorf 13, 89 

Habersetzer, Polling 87 

Heimsoeth, München 53 

Jeschke, Kelkheim 85 

Kingsoft, Roetgen 108 + 109 
KKB Bank, Düsseldorf 9 

Microland, Schwaig 84 

Pandasoft, Berlin 85 

Rushware, Kaarst 4. US 

Triebner, Nürnberg 17 


Wiesemann -f Theis, Wuppertal 85 
Wüstenrot, Ludwigsburg 20 + 21 


Ein Teil dieser Auflage enthält Pro¬ 
spekte von Time Life, München. 


Für Programm- 
Entwickler 

die sich eine eigene Softwaremo¬ 
dul-Bibliothek für Turbo-Pascal 
aufbauen wollen, bieten wir pro 
Quartal ein TURBO-SPECIAL mit 
Diskette an. Sie finden dort: 

* Utilities 

* Tools 

* Updates 

* Entwickler-Module 

* und viele Tips und Tricks 

Der Hammer 

im TURBO-SPECIAL 1: Mit 
dem Programmierwerk P-List, 
dem besten uns bekannten 
Ausdruckprogramm 

Der Hammer 

im TURBO-SPECIAL 2: Mit 
dem ersten Inline-Makro- 
Assembler der Welt 

Der Hammer 

im TURBO-SPECIAL 3: Mit 
Window-Technik auf jedem 
Rechner 

TURBO-SPEZIAL 4: In Vorberei¬ 
tung. Lieferbar: Januar 1987. 

Weitere Informationen und unser 
TP-lnfoblatt für Turbo-Pascal-Pro- 
grammentwickler fordern Sie an 
bei: 

Vogel-Verlag, Frau Rath, 
Schillerstraße 23a, 

8000 München 2, 

Telefon (0 89) 5 1493-59, 
Stichwort: TP 


HC-EINKAUF 



Backnang 


Frankfurt 


ABACOMP 

Ihr Computerfachhändler: Wir führen 
APPLE, brother, Commodore, EPSON u.v.a. 
Ladengeschäft: Ginnheimer Landstr. 1 
6 Frankfurt 90: Versand- und Postadresse 
Kransberger Weg 24, 6 Frankfurt/M. 50 


Mannheim 


® 4 


++BASF++IN++BLAU++ 

BASF-DISKETTEN 
weil Qualität kein Zufall ist! 

Sonderpreise gültig ab 01.06.1986 (Endverbraucher) 

BASF-Flexydisk 5,25" ab 50 100 200 500 lOOOSt. 

ID,SS/DD DM 4,50 4,33 4,16 4,04 3,87 

2 D, DS/DD DM 5,64 5.47 5,30 5,18 5,01 

ID.96/100tpi DM 5,41 5,18 5,01 4,90 4,73 

2 D, 96/100 tpi DM 7,46 7,23 6,95 6,78 6,66 

2D,DS/HD96tpi,1 1 2MBDM 11,97 11,74 11,57 11,45 11,28f.lBMAT 
BASF-Rexy-Disk 3,5“ ft/ HP 150, Epson, Atari u. Sony-Laufwerke 
1D, SS/DD 135 tpi DM 7,69 7,46 7,29 7,18 7,01 

2D, DS/DD 135 tpi DM 11,11 10,88 10,71 10,60 10,43 



High Quality - made in USA „Data-Super-Life" 

.X)x/Disk. 


■Stand.) 

3,47 

3,81 

9,51 f. IBM AT 


9,51 

10,37 


0 


5,25" ab (auf Wunsch auch in transparenter Muftibo) 

ID,SS/DD DM 4,16 3,93 3,76 3,64 

20, DS/DD DM 4,50 4,27 4,10 3,99 

2 D, DS/HD 96 tpi, 1,2MB DM 10,20 9,97 9,80 9,69 

3,5", 135 tpi ab 

ID,SS/DD DM 6,78 6,55 6,38 6,27 

2 D, DS/DD DM10,20 9,97 9,80 9,69 

3*,CF20b.720 KBnettoDM 11,28 11,05 10,83 10,60 

Kompatibel zu: Info über Telefon-Service Tel. Nr. für EILAUFTRAGE 06205/4011 
+++ Händleranfragen erwünscht, Preise anfordern! 
NEU++NEW++IBM-Kompatto!e Rechner Serie .Science’ 

Science - XT DM 2.680,- Miete 74,- p.M. 

Science-ATOM 6.980,-Miete 183,-p.M. 

Disk.Ablage org. ABA lnh.:40 50tragb. 60 90 lOOtragb. 

3,5” per Stuck DM 74,10 

5,25'per Stück DM 55,86 74,10 78,66 101,46 

8' perStück DM 90,06 112,86 

Sonderangebot: Disk.-Ablage 5,25" Neutral für 100 Disketten DM 44.46 

G-DAS Datenservice GmbH 

ln der Clamm 32, 6832 Hcrckenheim 

Tel.-Nr. für EILAUFTRÄGE: 06205/4011 

TELEX: 465806 gdasd 

++BASF-H-TN++BLAU++' 
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ÖSTERREICH 

GENERALVERTRETUNG 
HC ’ Service 

Erb Verlag Ges.m.b.H. & Co KG 

Abt. Buch- und Zeitschriftenvertrieb 

Amerlingstraße 1 • 1061 Wien 
Tel: 56-62-09, 587-05-25, FS: 136145 


SCHWEIZ 


GENERALVERTRETUNG 
HC • Service 



THALI AG 


Fachliteratur, Bausätze, Bauteile 
6285 Hitzkirch • Tel. 041/85 28 28 
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Die Bundesliga total er¬ 
faßt: Ein Superlisting für 
Commodore 64 bringt jeder¬ 
zeit Ordnung und Überblick 
in das (hoffentlich) dramati¬ 
sche Geschehen in den 
Fußball-Stadien. Das pa¬ 
tente Tabellenprogramm 
wird natürlich auch mit allen 
anderen Liga-Sportarten fer¬ 
tig. 


Das nächste Heft 
erhalten Sie ab 
15. September 1986 
bei Ihrem 

Zeitschriftenhändler 



Außerdem lesen Sie 


sich prächtig. Den Beweis 
liefert das Programm CAD- 
Easy, das auf allen Schnei¬ 
der CPC läuft. 

Im Pascal-Teil müssen 
diesmal alle einschlägigen 
Compiler zeigen, was sie 
können. 

Forth für Individualisten: 

Die Programmiersprache 
läßt sich mit eigenen Befeh¬ 
len beliebig erweitern. 


Datenfernübertragung, 

mehr als ein faszinierendes 
Hobby: Was der persönliche 
Kontakt zu Datenbanken 
und Mailboxen bringt, wie 
der ideale DFÜ-Platz aus¬ 
sieht, welche Terminal-Pro¬ 
gramme und Akustikkoppler 
sich am besten bewähren — 
HC liefert das komplette 
Know-how für Datenreisende 

Sinclair QL, das verkannte 
Genie: Wir stellen zusam¬ 
men, was für den meist un¬ 
terschätzten Rechner derzeit 
an Software und Zubehör 
angeboten wird. Dazu eine 
informative Beschreibung 
sämtlicher Schnittstellen 
des ,,Guantensprungs“. 


Mit Desktop-Program- 

men kommt Luxus am Com¬ 
puter auf. HC beschreibt, 
was die nützlichen Helfer im 
Hintergrund leisten. 

Drei neue Drucker stellen 
wir vor: Von Atari, Riteman 
und Robotron. 

Ein Sound-Sampler ent¬ 
lockt dem Atari ST die unge¬ 
wöhnlichsten Töne. Wir te¬ 
sten den Tonkünstler. 


CAD und CPC vertragen 
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VOGEL 


Computerbücher 


Senftleben, Dietrich 

Start mit Apple-Logo für II, Ile 
und llc 

Das kleine Logo-Einmaleins 
Grafik • Text • Musik 
222 Seiten, 70 Abbildungen, 
35,- DM, 1985 
ISBN 3-8023-08 32-8 

Willkommen bei Logo und sei¬ 
nen beiden Versionen Apple- 
Logo und Apple-Logo II, be¬ 
kannt als benutzerfreundliche 
Computersprache für Ausbil¬ 
dung, Freizeit und Beruf. Mit¬ 
tels Schildkrötengrafik wird 
das kleine Logo-Einmaleins in 
12 Lektionen beschrieben. 

Das Buch verlangt praktische 
Mitarbeit. Es hat seinen Platz 
neben dem Computer und 
gibt Hilfen und Anregungen 
für eigenes Forschen. 


Teiwes, Eike 

Programmentwicklung in 
UCSD-Pascal 


Beispiele • Aufgaben • Anre¬ 
gungen 

344 S., zahlr. Abb., 28,— DM 
ISBN 3-8023-0760-7 

Aus dem Inhalt: 

— Das ist Pascal 

— Rechner und Betriebs¬ 
system 

— Programmentwicklung 

— Datentypen 

— Grafik 

— Grafik im Textmodus 

— Dateneingabe und 
-ausgabe u.v.m. 

Baumann, Rüdeger 

Spiel, Idee und Strategie pro¬ 
grammiert in Pascal 

326 S., zahlr. Abb., 35,- DM 
ISBN 3-8023-0732-1 

Aus dem Inhalt: 

— Denkspiele mit Zahlen 

— Suchen und Raten 

— Solospiele 

— Zweipersonenspiele 

— Spielstruktur 

— Spielanalyse 

— Suchalgorithmen u.v.m. 


VOGEL-BUCHVERLAG 

WÜRZBURG 



Vogel-Computerbücher — 
mehr wissen, mehr leisten 

Sie erhalten bei Ihrem 
Buch- und Computerfach¬ 
händler kostenlos das neue 
Verzeichnis „VOGEL- 
Computerbücher 1986“ 
mit ca. 120 aktuellen 
Titeln unserer Reihen 
CHIP WISSEN und HC - 
Mein Home-Computer. 
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- Bernd Kretschmer -- 

EE MultiplanTraining£ 
= auf Apple Ile und = 
z= Apple llc - 

Eine leicht lesbare systeinatische Einführung 


CHIP 

WISSEN 


-_r^> bra - 

Applesoft- e= 
BASIC total 

f^^Tcvnmiertet'hniken und 
Anwendungen für Apple II Ile und llc 


Robra, Jörg 

Applesoft-BASIC total 

Programmiertechniken und Anwendun¬ 
gen für Apple II +, Ile und llc 
340 Seiten, zahlr. Abbildungen 

Das Buch zeigt, wie aus einem Problem 
— zunächst computerunabhängig — 
über Analyse, Zieldefinition, Benutzer¬ 
handbuch, Modularisierung und struktu¬ 
rierte Programmierung ein sauber aufge¬ 
bautes und benutzerfreundliches Pro¬ 
gramm entsteht. 

ISBN 3-8023-0872-8 45,— DM 


Kretschmer, Bernd 

Multiplan-Training auf Apple Ile 
und Apple llc 

Eine systematische Einführung 
260 Seiten, zahlr. Abbildungen 

Alle Nutzer des Apple II werden hier ein 
Arbeitsmittel finden, das alles Wesentli¬ 
che über das Tabellenkalkulationspro¬ 
gramm Multiplan aussagt. Hier werden 
im didaktischen Ansatz Lösungsmög¬ 
lichkeiten schrittweise anhand von vielen 
Beispielen aufgezeigt. 

ISBN 3-8023-0847-6 38,— DM 






































































































X STAR.LINE & 


Vertrieb 


MICROPOOL Produkte 
erhalten Sie ih 
den Fachabteilungen 

-Horten. * 

ä Quelle 

von und INTERNATIONAL 

sfowie in gutsortierten 
Computershops. i* 

Mission ELEVATOR'bestellen . 

Sie bet'QueHle unte^di^r Kat.-Nr.': .* 
CPC-Käss 560-632$ V . ; 

C64-Kass 560- 813-8 : -/V. 

C64-Qjßk . 560-823-7 ; X 


"...sehr gut gelungenes 
Actionspiel mit 
Abenteuer-Toucli ulff 
sehr, hohem Spielwitz.” 

(HAPPY COMPUTER 07/86) 

Mission ELEVATOR ist * 
lieferbar für: • ' sm 

COMMODORE und * 

SCHNEIDER 
(Kassette, Diskette) 

MIT DEUT&HER 


Mityertrieb: • . 

Mierohandler GmbH 
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